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Now there are hundreds of additional new uses 


something for every member of your family 


Our library of application programs 
for the TI Home Computer is grow¬ 
ing rapidly. And LJmL's great for 
Tl-99/4 owners. The more programs 
to choose from, the greater the value 
and utility of this remarkable home 
computer, 

Programs are available in three 
different, easy-to-use formats — 
Solid State Software”' Command 
Modules, diskette and cassettes — 
in a wide range of application areas: 


* Youth Education. * Rome Manage¬ 
ment and Personal Finance. * Enter¬ 
tainment* ■ Anri much more. 

Many independent software com¬ 
panies are also creating programs 
for the TRIM Home Computer, 
Companies like: Scott, Pores man 
and Company; Micro-Ed, Inc.; Pro¬ 
gram Design; 99/4 National Ivors' 
Group; Creative Computing; Micro¬ 
ti o i n p u l. e rs C torpor at. ion; Image 
Co mp u tor Prod i i c U ; 1 n slant Soft 


ware; Charles Mann and Associates; 
and many more. 

Get a copy of our Application Pro¬ 
gram Directory. 

You can pick up a copy of our latest 
catalog of Tl-99/4 software today at 
voor nearest Texas Instruments 
Home Computer dealer. 

To receive a copy by | 
mail, call toll-free 
1-SI)1 >-&"j 8-45G5. InTbxaa 
call I-SCO-692-4 2 79. 


(longratalations to the 
winners of our Author 
Incentive Program 
contest, 

Wt: received many inno¬ 
vative and exciting ap¬ 
plication programs from 
individuals who encored 
our recent Author In¬ 
centive Program. Our 
thanks to all those who 
submitted entries. 


First Prize Winner J30nfl.0ft 
Cnans m Ehnlnger 
Fi.w:i'„ ix 

(Program: Housuho d In^Hritory; 

Secniid Prim Winner 
fclDOfl.DDL-Eadl 
Wayne 0 . Wiliams 
Mess, Arzona 

fPr:;rjr 3 .nl: MelrlC SySliirr- 'ulprj 
Fred J. Bskar 
Motley, MM 

fHurtjram: Koplar Plgnatory Matian) 
Ivanman S. Kerr 
St, fell, MM 

(Program: Mcndellan Inheritance) 


Qliii ' M. We ■iri!3ii 

Taranto Ontario CANADA 
(Prog ■rain: Addition reaching Tools) 
■lack Klrbv 
BraUtport, IW 

■! p my!.;:n lU^lh Hi!ri ffilM L i!:-|) 

Third Prize Winners SSO&.OO-tacIi 
Ysh.'in W. Mills 
HhikhkA, MD 
Colin James in 
Denver, CO 
Richare I, Coggins 
AltntouerquO, NM 
Richard A. Li I 
Hcnis-tcn, FX 


Atari Winkley 
Oakland. UA 
Suzanne M Hawkinsan 
Lanington hlA 
Charles. W. Engel 
lampa. F, 

Mnrfto (.!. Burkhart 
Alexandria, va 
Robert M Kiehn 

I tg TX 

smi Cr^rj Cliristlansdn 

II sa. OK 

W iisme 0. Christianson 
Tulsa. BK 
[ton 0. Rich. ui. 

Thamasullla NC 


Lionels L. Bertrand 
Wallingfand CT 
Jare Riukfir 
Los Altos UA 
Jem M Anderson 
Wilmington, ml 
Ft'chard I. Lara on 
W mington. MC 
Rcitn-m j. Rrondlzi'isAi 

M(jrd::iri..ii.)y, II 
Ed wad G. &a'«iwajF 
Pse-nh MC 
p.y|!n;iv Jayfrani 
Lyndhurs.:. UH 
John and Karma dutofl 
Perrysbun}, OH 
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Digital Computer Cassettes 

with LIBRARY ALBUM 


• High-Quality BASF Tape in a 5-Screw 

Cassette Housing for Data Integrity 

• Secure Storage & Quick Convenient Retrieval 

with Protective File Album 

• 8 Special 50-Foot Cassettes - Ideal for 

Building Up Your 99'er Program Library 

• Economical As It Is Functional 

>T Only $9.95 each; or 3 for $27.00 

Add $2.00 shipping and handling for the first album; 75<f for each 
additional album. Use the bind-in card in the back of the magazine 
for your convenience in ordering. Telephone orders accepted if 
charged to credit cards. 



T.M. 


71 INNOVATIVE PRODUCTS 
FOR TMS9900-8ASED 
PERSONAL COMPUTING 


P.O. Box 5537 
Eugene, Oregon 97405 
Tel. (503) 485-8796 
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THIS ISSUE’S COVER: 

The vast worldwide network of informa¬ 
tion resources, depicted in microcosm 
by the TMS9900 circuit board landmass, 
is catapulted into the home through the 
magical link of telephone and home 
computer. A generation of possibilities 
separates the son’s pensive gaze into the 

starscape and beyond . .. from that of 
his father’s preoccupation with the 
astounding reality of the present. The 
cover art is an original painting by 
Haydcr Amir from a design by Gary 
Kaplan. 

99’er Magazine is published bimonthly by 
Emerald Valley Publishing Co. f P.O. Box 55 37 . 
Eugene, OR 97405. The editorial office is lo¬ 
cated at 2715 Terrace View Drive, Eugene, 
OR 97405 (Tel. 503-485-87 96). Subscription 
rates in U.S. and its possessions are $15 for 
one year, $28 for two years, and $39 for three 
years. In Canada and Mexico $18 for one year, 
$34 for two years, $48 for three years. Other 
foreign countries $25 for one year surface, 
$40 for one year air delivery. Single copy price 
in U.S. and its possessions is $2.95, and $3.50 
in Canada and Mexico. Foreign subscription 
payment should be in United States funds 
drawn on a U.S. bank. Application to mail at 
controlled circulation postage rates is pending 
at Eugene, OR 97401, POSTMASTER: Send 
address changes to 99’er Magazine, P.O. Box 
5537, Eugene, OR 97405, Subscribers should 
send alJ correspondence about subscriptions 
to above address. 

Address all editorial correspondence to the 
Editor at 99'er Magazine, 2715 Terrace view 
Drive, Eugene, OR 97405. Unacceptable 
manuscripts will be returned if accompanied 
by sufficient first class postage and self- 
addressed envelope. Not responsible for lost 
manuscripts, photos, or program media. 
Opinions expressed by the authors are not 
necessarily those of 99'er Magazine. All mall 
d irected to the " Letters to t he Ed it or” co lumn 
will be treated as unconditionally assigned for 
publication, copyright purposes, and use in 
any other publication or brochure, and are 
subject to 99'er Magazine’s unrestricted right 
to edit and comment. 99'er Magazine assumes 
no liability for errors in articles or advertise¬ 
ments. Mention of products by trade name in 
editorial material or advertisements contained 
herein in no way constitutes endorsement of 
the product or products by 99’er Magazine or 
the publisher unless explicitly stated. 

Each separate contribution to this issue and 
the issue as a collective work Copyright©1981 
by Emerald Valley Publishing Co, All rights 
reserved. Where necessary, permission is 
granted by the copyright owner for libraries 
and others registered with the Copyright 
Clearance Center (CCC) to photocopy any 
article herein for the base fee of $1.00 per 
copy of the article or item plus 25 cents per 
page. Payment should be sent directly to the 
CCC, 21 Congress Street, Salem, MA 01970. 
Copying done for other than personal or in¬ 
ternal reference use without the permission of 
Emerald Valley Publishing Co. is prohibited. 
Requests for special permission or bulk orders 
should be addressed to the publisher. 
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introduction to the language itself. 
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By Kathleen M. Swigger / North Texas State University shows us 
how to make the most of one printer and disk drive. 
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Music Skills Trainer. 
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Programming Conventions 


99’ER VERSION 7.81.1 X B M 



= Program as listed will completely 
fill available memory and cannot 
be RUN with disk controller (and 
possibly RS232 Interface} turned on, 


End of Program or Article 


month 
year — 


version 


1 = original program 

2 \ 

■ / = no.of update 

ri I 


Tl Extended BASIC - 

Expansion Memory Required 
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A s both an editor and a publisher 
(and perhaps, somewhat of a 
mystic), I am well aware that a 
“theme” can’t be forced on a particular 
issue of a magazine without the cohesive¬ 
ness and “flow” of the magazine taking 
a telling blow. Time and circumstance 
dictate successful themes. One either 
“happens” or it doesn’t. In this case, as 
you’ve undoubtedly noticed from the 
cover, we do indeed have a theme—the 
home computer as our personal link to 
the world of information resources. It is, 
however, both pleasing as well as a little 
surprising for me to admit that we didn’t 
select it . . . it somehow “selected” us! 

Forgetting for a moment all the other 
significant things you can do with your 
own computer, just having a computer 
to use solely as a data terminal is a 
powerful enough reason for buying one 
. . . as you’ll soon find out in our lead 
article, Information Utilities and the 
Electronic Cottage. 

After you’ve read all about The 
Source and TEXNET in the article, 
Lawrence Riley will show you a profit¬ 
able way to put your microcomputer to 
work, as he examines a rather specialized 
information utility in The Small Inves¬ 
tor and the TI-99J4: A Look at the Dow 
Jones News Service. And be sure not to 
overlook our round-up of Electronic Bul¬ 
letin Boards that immediately follows. 

Later, if you should wonder about 
what other types of databases exist and 
how to go about searching them—for 
your own professional needs, or even 
for the purpose of launching an informa¬ 
tion brokering career—look no further 
than p. 40’s On-line Information Re¬ 
trieval, and learn how Boolean algebra 
works its wonderful magic to make in¬ 
formation access as easy as A+B=C. 

But all of this talk about information 
services and methods of database search¬ 
ing brings up an interesting question: 
How does this bundle of data pass 
through the telephone lines from one 
computer to another? Tom Berkey has 
the answer for you in Data Communica¬ 
tions and the TI-99J4. He will show you 
how the bits, bytes, and baud get moved 
from here to there . . . and back again. 

If you’ve gotten through all the over¬ 
view and tutorial articles so far, you’re 
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about due for a change of pace—perhaps 
a program. Well then, still keeping in 
line with our theme, how about giving 
our Electronic Home Secretary a spin. 
It's a rather special home applications 
program centered around the use of the 
telephone. Let Dr. Subbaiah show you 
how to set up cassette or disk informa¬ 
tion files, and to have your computer 
dial the telephone and time your calls. 

For the “big news” of this issue, be 
sure to check out the center photo spread 
for our on-the-scene, “Windy City” re¬ 
port on 77 at the Consumer Electronics 
Show, and a look at the new TI-99/4A 
console that Tl unveiled. The specula¬ 
tion is ended—temporarily. 

Tt did, of course, display their new 
software at the Chicago show, but per¬ 
haps you can’t wait... or maybe there’s 
nothing available yet that does what 
that “neat little TRS-80 program” is 
supposed to do. If that’s the case, let 
Fred Forster show you the ropes before 
you attempt that language conversion 
project. You’ll save a lot of frustration. 

But if, however, converting or writ¬ 
ing your own programs does bring on a 
case of “programmer’s headaches,” 
RUN straight-away to Kelley’s Korner 
for some more super games in the tradi¬ 
tion of our last issue. 

After you’ve had fun and relaxed 
with Kelley, remember that there’s al¬ 
ways a time and place for Getting Down 
To Business. This time, George Struble 
will take you through the basics of eval¬ 
uating a software package and program¬ 
ming your micro to calculate effective 
interest rate and return-on-investment. 

As George’s short program demon¬ 
strates, business software does usually 
require substantial amounts of data to 
input—the usual input device being the 
keyboard. Now, in a 99’er Review of 
the HI PAD Digitizer you’ll learn about 
a convenient alternative for more natural 
data entry. 

While we’re on the subject of alterna¬ 
tives, Duff Kurland shows us an alterna¬ 
tive to the single-user, mini-disk T1-99/4 
system with An Introduction to ■ the 
Marinchip Systems M9900. This new 
family member is, of course, also TMS 
9900-based, but uses 8-inch drives, has a 
multi-user operating system available, 
and is compatible with the S-100 bus. 


All in all, some versatile hardware and 
software for those of you needing a 
larger system. 

When we talk about a “new family 
member,” wc are referring to its use of 
the TMS9900 CPU or a slightly differ¬ 
ent version of the chip with the same 
basic instruction set. The University 
Board’s TMS9980A falls in this family, 
so wc continue our coverage of the 
board with Bombs Away!— a war game 
program that also makes use of a com¬ 
patible TMS9918 Video Display Proc¬ 
essor board. All you Extended Basic 
sprite lovers should find the program list¬ 
ing informative. If you should, however, 
have trouble understanding the accom¬ 
panying assembly listing for the joystick, 
be sure to sit in on Dennis Thurlow’s 
continuing class on TMS9900 Machine 
& Assembly Language. 

Rounding out this July/August issue 
is our familiar “magazine within a mag¬ 
azine,” On LoCA It ion— for 99’ers inter¬ 
ested in using their computers for edu¬ 
cation. As seen from page 57’s magazine 
cover, the 99’er Schools of Music, Engi¬ 
neering, and Typing are ready to help. 
But lest we concentrate solely on tradi¬ 
tional CAI (computer-assisted instruc¬ 
tion), we do have a couple of articles for 

the LOGO and Chess aficionados as well. 

And finally, for any schools that 

need to use multiple micros but can’t 
afford duplicate peripherals, Kathleen 
Swigger will reveal the North Texas 
State University solution. 

I’d like to take this opportunity to 
congratulate Ralph Oliva, Alecia Helton 
and Diane Musha of Texas Instruments, 
as well as Niky and Susie Murphy, stu¬ 
dents at the Lamplighter School, for a 
fine performance on the Mike Douglas 
Show the week of July 6th. Eleven mil¬ 
lion TV viewers were treated to daily 
demonstrations of Tl learning aids— 
including the Home Computer with Tl 
LOGO on the last two days. On the 
last day, the show’s guests, Captain and 
Tennille, were treated to a computerized 
rendition of their hit song, Love Will 
Keep Us Together. And as the show 
ended, Toni Tenille sang along with the 
TI-99/4 computer! 

Until next issue-Have fun reading, 

learning and RUNing. MBt 


































































The MX-100. Not just better. Bigger. 

Epson. 


Our MX-80 was a pretty tough act to follow. I mean, 
how do you top the best-selling printer in the world? 

Frankly, it wasn't easy. But the results of all our 
sleepless nights will knock your socks off. 

The MX-100 is a printer that must be seen to be be¬ 
lieved. For starters, we built in unmatched correspon¬ 
dence quality printing, and an ultra-high resolution bit 
image graphics capability. Then we added the ability to 
print up to 233 columns of information on 15" wide 
paper to give you the most incredible spread sheets 
you're ever likely to see. Finally, we topped it all off 
with both a satin-smooth friction feed platen and fully 
adjustable, removable tractors. And the list of standard 
features goes on and on and on. 

Needless to say, the specs on this machine — and 
especially at under $1000 — are practically unbelievable. 
But there's something about the MX-100 that goes far 


beyond just the specs; something about the way it all 
comes together, the attention to detail, the fit, the feel. 
Mere words fail us. But when you see an MX-100, you'll 
know what we mean. 

All in all, the MX-100 is the most remarkable printer 
we've ever built. Which creates rather a large prob- 

lem for those of us at 



EPSON AMERICA, INC 


3415 Kashiwa Street • Torrance, California 90505 * (213) 539-9140 

See the whole incredible Epson MX Series of printers at your Authorized Epson Dealer. 
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"... we find more and more companies that 
can be described ... as nothing but 'people 
huddled around a computer .' Put the computer 
in people’s homes, and they no longer need to 
huddle ." 

-The Third Wave 
By Aivin Toffler 


S ' IW, 


I n his recent book, The Third Wave, Alvin Toffler 
presents a powerful argument that “ . . . our big¬ 
gest factories and office towers may, within our 
lifetime, stand half empty . . . this is precisely what 
the new mode of production makes possible: a return 
to cottage industry on a newer, higher, electronic ba¬ 
sis, and with it a new emphasis on the home as the 
center of society.” Toffler goes on to single out many 
powerful socio-economic forces that are presently 
fueling this transition and points to the software pro¬ 
duction industry which has already set an early exam¬ 
ple as the fastest growing cottage industry of the 
1980s. 

Within the iast year and a half, the microcomputer 
community has been witnessing the unfolding of an 
extraordinary event. 1 say “extraordinary” not because 
of what has already happened, but rather, for what it 
portends for the future. What is this event, and what 
great significance does it hoid? Quite simply, the event 
has been the birth and maturation of “information 
utilities”—a significant event because of their awesome 
potential to speed up Toffler’s timetable and change 
the way most of us live and work within this current 
decade! 

There’s certainly nothing mysterious about utilities. 
All of us are already familiar with telephone, electric, 
water and gas utilities. These are necessary and valua¬ 
ble resources delivered to and consumed in the home. 
If we now add information to this list, we create an 
“information utility”—a service that brings informa¬ 
tion to a place where the general public can access it 
and put it to use .. . and where the cost of packaging 
and delivery is shared by the consuming public. And 
what better, more convenient place is there for the 
general public to consume this information than in 
the home—the forthcoming “electronic cottage.” 

The New Timesharing 

Timesharing, the foundation of all information 
utilities, is certainly not new. It was originally devel- 










INFORMATION 

UTILITIES 


oped to serve the needs of business by providing com¬ 
panies with access to computer power without them 
having to buy expensive data processing equipment. 
Custom programming and technical assistance were 
available at extra cost to those who couldn’t use the 
“canned programs.” 

What these information utilities have done is add a 
new wrinkle to the traditional timesharing concept. 
Using the famous “baking soda technique”—whereby 
a producer of this unglamorous age-old product con¬ 
tinually dreams up and advertises new uses for it— 
they have repackaged timesharing to make it palata¬ 
ble to a much greater potential market. But lest you 
jump to the wrong conclusion, I should point out 
that these utilities are not simply pushing an old ser¬ 
vice to a new market. Rather, what we really have 
here is the creation of an entirely new dimension to 

AND THE 

timesharing—an attempt to satisfy a mass audience 
with extremely diverse needs and wants ... and do it 
at an affordable price. 

Information Services for the Masses 

To provide you with some appreciation for the 
great diversity of presently available information ser¬ 
vices, let’s take a brief look at one of the largest, 
fastest growing utilities, The Source {a service mark 
of Source Telecomputing Corporation, a subsidiary of 
The Reader’s Digest Association, Inc.). At present, 
The Source offers over 1,200 services in areas such as: 


computer-based message services 
proprietary databases 

business and professional applications packages 
personal and corporate services 
consumer purchasing 
entertainment 





8 99'er Magazine July/August 1981 































The E.Y.A.W.T.K.A.T.T.I.P.C.B.D.K.W.T.A? Questionnaire 


PART 1: THE TI-99/4 & TI-99/4A CONSOLES 


g ,—- Filling in and mailing this questionnaire as soon as possible will 

1 help us get you the answers. Please participate. Thank you. 


(a) What would you like to know about the hardware? 


(b) About the internal software & programming languages? 


(c) What changes & new languages would you like to see? (Please include 
prices you'd expect new consoles & programming languages to cost.) 


PART 4: MISCELLANEOUS 


PART 2: THE PERIPHERALS _ 

(a) What would you like to know about the operation, control, 
& interfacing of existing peripherals? 


(b) What would you like to see forthcoming? (Please include 
prices you expect these to cost.) 


PART 3: THE SOFTWARE 


(a) What would you like to know about existing software (both 
Tl & compatible non-TI)? 


(b) What would you like to see forthcoming? 

(Please include prices you'd expect the packages to cost.) 




(a) What would you like to know that wasn't covered in Parts 1-3? 


(b) Why did you buy the Texas Instruments computer? 


(c) What hardware/software (both Tl & compatible non-TI) have you 
already purchased? (Exclude owner-written user-group programs.) 


(d) What additional purchases do you expect to make? 


(e) How is your computer used? Business? Education? Games? 
Other? Please explain. 


(f) What is your occupation? 


(g) What articles would you like to see in 99'er Magazine? 


(h) Have you already found us at least one more subscriber? 
If not, please do so. Thank you. 


Everything You Always Wanted To Know About The Texas Instruments Personal Computer But Didn't Know Who To Ask 


PLACE 

STAMP 

HERE 



P.O. Box 5537 
Eugene, OR 97405 


PLACE 

STAMP 

HERE 



P.O. Box 5537 
Eugene, OR 97405 
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All these services enter a subscriber's home or business 
through existing telephone lines (using the packet-switching 
networks of Telenet and Tymnet). A local toll-free 800 
number is available in over 300 U. S. cities for accessing 
The Source. A subscriber types in (on a computer terminal 
connected to the telephone line, or a self-contained micro¬ 
computer with appropriate software to emulate a terminal) 
his or her private ID account number, and then chooses 
from a menu of services. Since subscribers can command 
the “host” computer in plain English (in a somewhat abbre¬ 
viated form), very little instruction is necessary to do mean¬ 
ingful things—an extremely important attribute of any 
information utility. 

Although an information utility such as The Source 
hopes, in the not-too-distant future, to be able to feed mil¬ 
lions of inexpensive computer terminals in U. S. households, 
its present subscriber base of approximately 10,000 is 
drawn from the business community and a small segment of 
the vast consumer community—the segment which present¬ 
ly owns microcomputers. 

It's not surprising why businesses of all types are attracted 
to very inexpensive services such as electronic mail, travel 
arrangements, applications software packages, programming 
access to mainframes, and business/industry news. It does, 
however, take some stronger incentives to lure the consumer 
segment of the microcomputer community—the present-day 
pioneers who purchased their micros for home use. It’s to 
this group that information utilities like The Source must 
ultimately cater if they hope to eventually reach the econo¬ 
my of distribution and substantial return-on-investment 
that are possible in a mass market. 

To this end,consumers with microcomputers are present¬ 
ly being wooed with a rapidly expanding array of personal 
services (such as bookkeeping, correspondence, travel ar¬ 
rangements, and keeping track of investments), educational 
programs, home economics assistance, plus activities and 
information that the whole family can use—especially games, 
movie and product reviews, news, and sports reports. 


The TEXNET Turn-On 

If having the services and activities of The Source in 
your home isn’t exciting enough for you, how about having 
it together with the following package of special enhance¬ 
ments: color graphics and animation, music and sound ef¬ 
fects, a software exchange with hundreds of free programs, 
plus state-of-the-art synthetic speech—with alI screen text 
actually "spoken"’ to you! No, all this isn’t just a “ would n’t- 
it-be-great-if” speculation of things to come, but rather, 
embellishments to the basic Source menu that will be avail¬ 
able very shortly. 

The special services and enhancements I’ve been describ¬ 
ing are available to users of the Texas Instruments T1-99/4 
and TI-99/4A microcomputers, and come under the 
TEXNET (a service mark of Texas Instruments, Inc.) 
umbrella. Besides the microcomputer, the only additional 
items that are needed to take advantage of all of the special 
TEXNET features are a plug-in RS232 Interface and mo¬ 
dem (for establishing a compatible telephone connection), 
a plug-in Terminal Emulator II Command Module (the 
software for the microcomputer), and the plug-in Solid 
State Speech Synthesizer—the Texas Instruments peripheral 
that “voices” the synthetic speech. [See 99’er Magazine , 
May/june 1981, p. 30]. The synthesizer won’t be necessary 
if speech capability isn’t desired. 

Just how, exactly, are TEXNET and The Source related? 
According to Craig W. Vaughan (President, Software Sor¬ 
cery, Inc,), a systems support consultant to Source Tele¬ 
computing Corporation and Texas Instruments, TEXNET 
appears to totally encompass The Source. That is to say, 


TEXNET subscribers have access to everything Source 
subscribers do, plus additional special services that require 
the Texas Instruments Home Computer for access and use. 
Graphically, it would appear like this, 
with the outer ringof TEXNET includ¬ 
ing everything within The Source’s in¬ 
ner ring, and expanding its own outer 
ring of special services over time. This 
is only an appearance, however, as 
Vaughan pointed out: “In reality, 

TEXNET users will berunninga shell program . .. TEXNET 
will eventually be a collection of programs running on The 
Source system.” 

Services on TEXNET fall into two major groups: (1) 
directory or lookup textual information, and (2) interac¬ 
tive or transfer services. In this first group there will be a 
product and technical newsletter (Tl News), Tl Software 
Directory, Tl User Groups, Tl Service Centers, and Tl Pho¬ 
netic Dictionary (helpful when programming with text-to- 
speech). The second group of services is really what TEXNET 
is all about. First, there are the transfer services. Sophisti¬ 
cated error-checking software in the Terminal Emulator II 
Command Module will permit any of hundreds of user pro¬ 
grams from the Tl Software Exchange to be downloaded 
correctly into another user’s system. Eventually, we can ex¬ 
pect to see on TEXNET the capability for direct uploading 
and downloading between users. The Tl Graphics Library 
and Tl Music & Sound Library will work the same way: A 
TEXNET subscriber will be able to download the color 
graphics, musical scores, and sound effects into his own 
system for later use in his own programs. 

The interactive services on TEXNET are really speech 
enhancements of services already available on The Source. 
For example, the electronic mail service-probably the most 
highly used service, and reason enough for many to be or 
become Source subscribers—is made even more intriguing 
when your mail is “read” to you by your machine’s electro¬ 
nic voice. And if “electronic voice mail” intrigues you, wait 
till you experience Tl Voice Chat: TEXNET users will be 
able to participate in “spoken” interactive communication, 
CB-style. Well almost . . . What actually happens is that one 
user types in something, and the words get converted back 
to synthetic speech on the other end; the typed-in reply 
gets sent back, and then also gets converted to speech. So 
what we actually wind up with is a real-time verbal conver¬ 
sation between two speech synthesizers! 

Is it affordable? What does all this cost? You be the 
judge: There’s an initial one-time subscription fee of $100 
for The Source/TEXNET registration, and usage fees of 
$2.75/hour (midnight to 7 a.m.), $4.25/hour (on weekends 
and on evenings from 6 p.m. to midnight), and $ 15/hour 

(weekdays from 7 a.m. to 6 p.m.) for prime-time business 
usage. 

There’s one short paragraph in the latest Source brochure 
that perfectly sums up what’s presently happening in the 
world of information utilities: 




This brochure is obsolete. 

By the time you read this brochure, new 
information and communication services 
will have been added to The Source, Old 
data bases will have been updated , and 
streamlined '' userfriend/y ’' access proce¬ 
dures introduced. 



Without a doubt, it's an exciting time to be living and learn¬ 
ing along the new information frontier. 
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AN INTRODUCTION TO 
THE MARINCHIP SYSTEMS M99O0 



The Marin chip System M9900 CPU Board. 

Notice the large TMS99G0 1 G4>rt microprocessor in the center. 


W hat? Another 16-bit TMS99GQ- 
hnsed personal computer sys¬ 
tem? You mean the TI-99/4 
actually lias company oul there in the 
prcdominciuly 8-bit micro world a 
close relative who shares the same 
powerful instruction sol and archi¬ 
tecture in a landscape infested with the 
hires of Z&Os, 6800s, and 6J02s? 
Refoicc 99'ers.. . . you arc not a I one. 
Welcome your California cousin, the 
Marin eh ip Systems M990G. Despite lit¬ 
tle publicity since its introduction 
in the spring of 1978, the M990Q 
has aHracted many enthusiastic users, 
Marfnchip’s system is built around Lhe 
16-bit I'exas Instruments TM5990Q 
microprocessor - the same chip used in 
the T3-99/4. Beyond that, however, the 
two computers differ dramatically, I his 
article will serve as an introduction 
to the M9900 hardware and soft¬ 
ware. Future articles will explore 
specific programs and applications in 
greater depth, 

Wc at 99'er Magazine would like 
to take this opportunity to welcome 
My 900 users into our "99-er 3 am My," 
and hope that you’ll actively contribute 

About the Author 

Doff Kurtsnd is a senior sySTOms pro¬ 
grammed; for o computet service bureau, and 
hm bed eleven years of experience on tame 
Sperry Univ.jc comparers. Having chosen 
computers as Ins nobby as Weft, Duff has 
assisted in the devefopment of some ot the 
Marine hip 5>¥teriw software. 


by submitting your tips, suggestions, 
and articles to us. [And as TM59900 
assembly language programming be¬ 
comes readily available to TI -99/4 use is 
with a soomto-hc-ndeased assembler 
Command Module, there wilt be more in 
common, and more resource sharing 
between the two user communities 
Ed, I 


The SI00 Bus 

Unlike the portable, self-contained 
T3-99/4, the M9900 system consists of 
several circuit boards which plug into 
slots in an SI 00 mainframe, A video 
terminal is usually employed as the 
system console, and since Marin chi p's 
software relies heavily on disk storage, a 
pair of 8-inch floppy disk drives rounds 
out the basic system. 

The SI00 bus was the first wide¬ 
ly accepted microcomputer bus stan¬ 
dard, and sports a broad range of 
Compatible circuit boards From a 
multitude ot vendors. The M99O0 
thus offers tlie 16-bit power of the 
i M S9900 C i 1 U chip, a I o i ig w it h the 
flex ib i li ty of the SI 00 bus a com hi¬ 
ll a Lion that's hard to beat. 

Flexibility? AlLach a letter-quality 
printer, and you've got a word process¬ 
ing system, Connect a high-speed dot 
matrix printer, and you’ve got a small 
business system. Or connect, a digitizer 


By Duff Kurland 


and a color graphics display, anti you've 
got an electronic or architectural design 
system. Or perhaps you're into com¬ 
puter music, speech synthesis, software 
development, household security, en¬ 
vironmental control, or all of the above, 
11 's q u i Lc c o nee i vab I e fo r on e S IOQ 
system to be equipped to do oif these 
things and more. 

With the T1-99/4 system, expansion 
is presently limited to 48K RAM, 
three 90K mini-disk drives, and two 
RS-2d2 ports. The M9900 system, how 
ever, lias oodles of expansion room. 
You can have additional banks of 64K 
RAM for a multi-user system, have sev¬ 
eral sciiai peripherals connected at ltie 
same time, and even connect a multi¬ 
megabyte hard disk, Bui expandability 
isn’L the only difference. Although both 
are based on the I MS9900 chip, the 
11-99/4 and the M990Q have vastly 
different operating systems: Programs 
designed for one will not run on the 
other unless the differences in system 
calls and disk storage formats are taken 
into consideration, and conversion util¬ 
ities provided. 

Hardware 

Mar inch ip Systems manufactures the 
boards which comprise the heart of the 
VI9900 system, and recommends Lhe 
products of various other vendors for 
other functions, A typical M99O0 sys¬ 
tem includes the following Mar in¬ 
chip hardware; 

* one M990Q CPU board 

* one PROM/RAM board 

* one or more 64K RAM boards 

* QUAD SIO board (optional) 

These boards arc assembled, tested, 
and burned in ai. the factory, and 
are supplied with "Theory of Op¬ 
eration” manuals. Also, Marin chip is 
one o; the few manufacturers to provide 
schematics for their hardware products. 

To complete a basic system you’ll 
need: 

* a video or printer terminal 

* two 8-inch floppy disk drives 

* a disk controller board 

* an SI 00 mainframe 

* a printer {optional) 
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Free Software 



The author's system. The printer is nut shown. 


All items are available through Marin- 
chip Systems, or can be purchased di¬ 
rectly from other manufacturers or 
dealers. Lei's lake a quirk look at 
each of the Mar in chip circuit boards. 


M990G CPU Board 

The M9900 CPU board connects the 
CMS9900 processor chip lo the SI00 
bus, providing all the proper bus control 
signals, Circuitry to support Marin chip's 
16-bit memory boards as well as most 
8-bit SI00 memory boards is found 
Iiere, as is line memory mapping logic 
necessary to support SlOO-styi: I/O, 
(The IK area Prom FLXXJ to HFF is 
used for this purpose.) 


64K RAM Board 

As mentioned above, the CPU 
board supports 8-bit and 16-bit mem¬ 
ory, If you already have an 81 GO based 
system, you ean probably use your 
existing memory boards with the 
M99QO, Since most memory accesses 
made Et y the IMS9900 chip itself are 
for I 6-bii w q rd>, logic on the CPU 
board will automatically make two 
accesses to ad lace nt bytes In order to 
read or write rhe desired 16-bit word. 
Use of 16-hit memory such as the 
Mar in chip 64K RAM board, however, 
will avoid the need for this double 
memory access, and enable ihe system 
to run at least twice as last. 

Tire 64 K RAM board provides 
64K bytes organized as 32K 16-bit 
words. DIP switches permit any combi¬ 
nation of the 16 4K blocks of memory 
i o h e d i sa b I ed, to p reve n l c onfl i cts w i Lh 
other memories or memory-mapped I/O 
devices. A bank switching capabil¬ 
ity is provided, permitting several 
64K RAM boards to share the same 
addressing space. Fhis technique is Used 
in multi-user environments, where each 
user may be assigned his own 64 K 
address space. 


PROM/RAM Board 

Marinchip's PROM/RAM board con¬ 
tains IK bytes ol 16 bit PROM (expand¬ 
able to 32K), one seiial 1/0 port, and a 
real-time clock. The I 6-bh RAM may be 
used for the workspace registers, speed¬ 
ing tip rcgislci access if your system 
has 8-bit memory boards. The PROMs 
contain the disk boot routine, and a 
debug monitor capable, of dumping 
memory in several formats. The serial 
1/0 port may lie used for the console 
terminal, and the real time clock is used 
by the NOS/MT multi-user operating 
system, 

The debug monitor PROMs normally 
use the top 2K of tho addressing range 
(F8Q0 through I fTl 1, while the lC>bit 
RAM resides at F400-F7FF. 

QUAD S|0 Board 

Interfacing additional peripherals is 
easy with Marinchip's recent hardware 
offering, the QUAD 5IO board. As its 
name implies, this board provides four 
serial I/O ports, each of which may 
be used to connect a printer, modem, or' 
additional terminal. 


.Marinchip Systems supplies a com 
plete software package with the pur 
chase [for s AH)) of their M99Q0 CPU 
board. This package includes the Disk 
Executive operating system, RASIC, an 
assembler, linker, line-oriented text 
editor, document formatter, and debug 
monitor. You also receive a host of 
tuitiiy programs. Much of the soft¬ 
ware is designed to operate with as, 

Iitile as 32K bytes of RAM in the 
system, but 64K is recommended. 

Disk Executive 

Hie Marin chip Disk Executive pro¬ 
vides a simple floppy disk file system. 
Flic names and maximum 4/e are chosen 
by the user, and the operating system 
keeps crack of where the tiles are lo¬ 
cated on disk. Ail disk I/O is file relative, 
and the system detects any attempts to 
read oi write outside file boundaries. 

Input/out pul operations arc hard¬ 
ware independent. All 1/0 devices are 
treated simply as files with special 
names. If you design a program to write 
in ,i disk file, you can direct it to write 
to a hardware device {such as a printer) 
w It h out a n y p r ogt am mod i fi cat lo n. 

The operating system performs all 
memory allocation for user programs in 
an address space organized as shown ill 
Figure 2. Programs may expand to fill 
all available memory automatically, and 
need not be regenerated when a hard¬ 
ware or software change results in a dif- 
forent user memory space, 

input typed on the system's console 
terminal is assembled in a buffer that is 
internal to the operating system, and de¬ 
livered to ihe user program only after 
the carriage i cl urn lias been entered, 
The system provides backspace capa¬ 
bility for error correction, and special 
control keys for deleting a whole word 
at a lime and For retyping the current 



A peek Inside the mainframe. The first board is the M99O0 CPU, followed by 
two 64K RAM hoards and the PROM/RAM board. 
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1 he M9900 1 fi-bit (j4K RAM Memory Board 


input line it you've become confused. 
Inclusion of the^e important features in 
the operating system means that they 
need not be implemented in each and 
every program, and presents a con- 
si stem personality to thu terminal user, 
A special system request permits a user 
program to take complete control of 
the console terminal in cases where 
character-by-charaeter input is required, 

Programs running under Lhc Disk Ex¬ 
ecutive may issue system calls to request 
various services, or may call upon Moat¬ 
ing point arithmetic, output editing, 
buffer pool control, or linked lisl sub 
routines huiit into the system, these 
features make the Marin chip M990Q sys¬ 
tem one of the finest systems I've ever 
seen for the software developer. Disk 
Executive system calls are upward-com¬ 
patible with the multi-user NOS/MT op¬ 
erating system, so that your investment 
in M9900 programs is not wasted if you 
upgrade to the fancier operating system, 

TFte Disk Executive also provides an 
easy way to add new system commands. 
The set of system commands which you 
enter from the console terminal can be 
easily expanded by writing a program 
and giving it the desired command name. 
You Lhcn can execute the new system 
command by simply typing rhe name of 
ihe file in which the program resides, 

BASIC 

The version of BASIC included in the 
CPU board purchase price is very similar 
to Microsoft BASIC. II offers two- 
character var i ah I e nan i es J | F -1' H F N- 
LLS.E, multiple-statement lines, single- 
line functions, disk I/O capabilities, and 
a statement trace feature. 

If you notice a program error while 
running a program, you may interrupt 
its execution and enter command mode. 
While the program is thus suspended, 


any PRINl statement you type will be 
executed immediately, so that you may 
examine file contents of program vari¬ 
ables. this feature may also be used to 
provide a simple ,L desk calculator.'' You 
may list or modify portions of the pro¬ 
gram, change variable contents, and con¬ 
tinue where you left off. 

Assembler and Linker 

If you Ye like me, and cn in y develop¬ 
ing system utility programs or fust get¬ 
ting down to the bare nuts and bolts, an 
assembler and linker will be essential 
tools. Well, these are also included free 
with the M9900 CPU. The assembler 
produces relocatable object code, and 
the linker can pull several ruloeatables 
together to make an executable program. 
This allows you to develop a large, com¬ 
plex program in neat byte-sized chunks. 

l hc assembler offers a few extra fra 
tores worth noting, IF -LLSE-ENDl di¬ 
rectives allow you to selectively assemble 
portions of a program, based on values 


attached to program labels. A COPY di¬ 
rective lets you place common deli ni 
lions in a disk lilc, and easily include 
them in any programs that need them. 
Also, the M9900 assembler recognizes 
several special instructions used by the 
Mann ch i p syst e m« F or i n sea nee, the sy s 
Lem call feature is implemented using 
the I M599DO's extended operation fa¬ 
cility (XOP), But, rather than saying 
"XOP 1 f ’ whenever you want the system 
to do something for you, you may say 
J 'j5YS hJ (meaning ''jump to system 1 '}. 

(ext Editor and 

Document Formatter 

The line-oriented text editor (EDIT}, 
and the document formatting pro-, 
gram (WORD) comprise the final major 
elements of the basic software package 
included with the M9900 CPI. board. 
Various file listers and copiers, file di¬ 
rectory routines, the debug monitor, 
and diagnostic utilities round out; the 
package, 


Contents of IMSAl Mainframe 

M9900 CPU board 
M9900 PROM/RAM board 
2 M9900 64K RAM boards 
Tcletek FDC'II disk controller 
IMSAl SI02-2 serial I/O board 
Dual Systems Control Corp CLK-24 
clock board, with battery backup 

Ha/eltine 1510 video terminal 
2 GSI 710-8 8-ire It floppy disk drives 
NEC Spin writer letter-quality printer 
Vadlc 12004>aiid modem 

Figure 1 - The Author's System Components 


0000 Standard workspace register area 
0100 User address area begins here 

- User address area ends here, and 

, o pe rat i n g system ad d ress a re a b egi n s, 

The exact address is dependent upon the 
h a rd wa re a n d so ft wa re c o nf i g u ra | i i> n, 

On my system, it 's around D1Q0, leaving 
about 52K bytes For user programs. 

+ 

EFTF End of operating system address area 
FOOO IK input/otitput memory map area 
F400 PROM/RAM board RAM area (1 K) 

FSOO PROM/RAM board PROM area (2K) 

Figure 2 - Disc Executive Memory Layout 
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SOFTWARE DEVELOPERS 

YOU SHOULD FIND OUT WHY SO MANY SYSTEMS FROM COAST-TO-COAST 
RELY ON CHECKS TO-GO FOR FORMS SUPPORT. 


* SELECT FROM OVER 200 IN STOCK ITEMS. INCLUDES CHECKS, 
STATEMENTS, INVOICES, PURCHASE ORDERS 

* ATTRACTIVE, PROFESSIONAL QUALITY FORMS THAT MAKE YOUR 
REPORTS LOOK EVEN BETTER! 

* UNSURPASSED DEALER AND USER SUPPORT. 

* YOUR NAME WILL APPEAR IN OUR ADS 

CALL TOLL FREE NOW AND ASK FOR MARIANN AMBROSE OR KEN BAKER 



CALL NOW TOLL FREE 
For free packets for the following systems: 


I |* Systems Plus * TCS • Structured Systems Group * 
t * Vector • Peachtree * Rjadio Shack * Osborne * 

* Alpha Micro • Durango * Warex * Cado ■ 

• BP1 


& Many More 
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EDIT allows you to enter a program 
or save data in a disk file, or to correct, 
modify, or simply look at the text of an 
existing disk file. It is "line-oriented” in 
that the. editor “looks” at one line of 
the file at a time. You can tell EDIT to 
move up or down in the file by using 
line numbers, or by searching for a 
particular string of characters. Once 
positioned at a line, you may use several 
commands to change the text on that 
line, (or from that line for a few follow¬ 
ing lines, or for the rest of the file). 

EDIT’s most outstanding feature is 
its file paging capability. You may safely 
edit a file whose text is much too lengthy 


to fit in memory all at once: EDIT will 
page portions of the file out to tempor¬ 
ary disk files, and will automatically 
bring them back into memory when 
needed, 

. WORD, the document formatter, 
reads text files from disk, formats the 
text as directed by user commands in¬ 
serted in the text, and writes the for¬ 
matted version to a disk file or printer. 
Facilities are provided to handle form 
letter preparation, program documen¬ 
tation, and many other word processing 
chores. You control the formatting par¬ 
ameters by using numeric and string 
variables, macros, and library files. 


I often use WORD to document the 
software I’ve written. Its automatic page 
and section numbering, table of contents 
generation, and heading/footing macro 
features make documentation a simple — 
even enjoyable — process. 

File Format Commonality 

It is important to note that most of 
the M9900 software was designed and 
implemented by one person, and that 
all the programs read and write text files 
compatibly with one another. Thus, a 
BASIC program could write a text file 
which is later edited using EDIT, then 
processed by WORD and written to a 
printer. The very article you are reading 
was written using the WINDOW screen 
editor. Its spelling was then checked 
using SPELL, and then was processed 
by WORD to produce the printed 
manuscript. 

Text file compatibility seems like a 
simple enough idea, but don’t take it for 
granted! There are numerous systems on 
the market whose Pascals, BASICs, and 
word processors all have different file 
formats. 

Additional Software 

The free software package described 
above is all you need to do software de¬ 
velopment in assembly language, simple 
BASIC, or to do word processing. How¬ 
ever, Marinchip Systems also sells addi¬ 
tional language compilers, operating sys¬ 
tems, business packages, and other 
“application” programs. 

An Extended Commercial BASIC 
provides all the features of the standard 
BASIC, plus PRINT USING, greater 
floating point precision, a program 
CHAIN capability, and random-access 
disk 1/0. 

Marinchip’s Pascal rs an implementa¬ 
tion of Per Brinch Hansen’s Sequential 
Pascal, and has no connection whatso¬ 
ever with UCSD Pascal. All the standard 
structured programming and data struc¬ 
ture definition,capabilities are provided, 
but the 1/0 is nonstandard. The com¬ 
piler makes seven passes over the pro¬ 
gram, and produces pseudo-code. Se¬ 
quential Pascal is well suited to large 
system development: the compiler itself 
is written in Sequential Pascal, yet can 
be compiled without difficulty in a 64K 
M9900 system! Each program, however, 
must include a “prefix” defining the 
system interface. If you need formatted 
output, you must also provide a set of 
output editing procedures. For these 
reasons, as well as the fact that the 
pseudo-code must be interpreted at run 
time, you may find QBASIC more 
suitable for program development. 

QBASIC is . a language compiler 
which was actually written by an M9900 
user. It is a compiler which accepts pro¬ 
grams written in CBASIC-2 (A trade- 
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SAVE BIG 

on TI-9S/4 

Great Savings 
on All TI-99/4 
Products & Accessories 


Console & Peripherals 


TI-99/4A 

$379.95 

10” Color Monitor 

329.95 

Disk Controller 

229.95 

Disk Memory Drive 

369.95 

Speech Synthesizer 

114.95 

RS232 Interface 

169.95 

Telephone Modem 

169,95 

RF Modulator 

39.95 

32K Memory Expansion 

289.95 

Solid State Printer 

299.95 


Accessories 


Joysticks (pair) 

28.95 

Dual Cassette Cable 

12.95 

Command Modules 


Extended BASIC 

76.95 

TI LOGO (September) 

Call 

Terminal Emulator II 

39.95 

Speech Editor 

36.95 

Household Budget 

34.95 

Management 


Personal Record Keeping 

39.95 

Video Chess 

54.95 

Football 

24.95 

Hunt the Wumpus 

21.95 

The Attack 

34.95 

Diskettes 


Mailing List 

54.95 

Teach Yourself BASIC 

29.95 

TI-TREK 

12,95 


Call for Prices on other 
Command Modules, Cassettes 

& Diskettes 


For faster delivery 

use cashiers check or money order. 

Add shipping : 

1% of your order {$3.00 minimum). 
East of Mississippi River add $1.50; 
California residents add 6%. 
Subject to availability. 

VISA & MC accepted. 


Order Toll Free 

(outside California) 

800421-5188 

Information Line (213) 633-3262 


TAM 



14932 Garfield Ave. 
Paramount, CA 90723 


mark of Compiler Systems) and pro¬ 
duces actual TMS9900 machine code. 
The resulting program runs much faster 
than any interpreted BASIC or Pascal 
program.. Many of the recent Marinchip 
utility programs, such as WINDOW and 
SPELL, were written in QBASIC. 

Just in case you’re not familiar with 
CBASIC-2, its major attributes are long 
variable names, structured WHILE- 
WEND constructs, formatted output 
(PRINT USING), and the nearly total 
elimination of BASIC’s annoying line 
numbers. QBASIC supports separate 
compilation of program segments, ac¬ 
cess to assembly language routines by 
simply LINKing them in, and several 
extensions to the CBASIC-2 language. 

Marinchip offers a second text editor 
called WINDOW. This is a screen-oriented 
editor which turns your terminal into 
a “window” looking into the text file 
being edited. You can move the window 
around in the file vertically (or even 
horizontally, if the file has lines longer 
than the width of your terminal’s screen). 

Control characters (or function keys, 
if available on your terminal) are used 
to move the cursor around on the screen 
and perform the desired editing tasks. A 
single keystroke puts WINDOW into a 
special command mode, allowing you to 
set various modes or request more com¬ 
plicated functions such as moving a 
block of text from one place to another. 
Like EDIT, WINDOW is capable of edit¬ 
ing a file whose text far exceeds the 
amount of user memory. 

I’m a horrible typist. Maybe you 
don’t spel so gud. Both of us can bene¬ 
fit from Marinchip’s SPELL program. 
SPELL looks up each word of a docu¬ 
ment in its dictionary, and reports any 
word that it hasn't heard of. Once you’ve 
weeded out the obvious abbreviations 
and acronyms, the remaining words are 
probably spelling or typing errors. Utility 
programs are provided to let you add 
new words to the dictionary. 

A Multi-Tasking Network Operating 
System (NOS/MT) is offered as an al¬ 
ternative to the Disk Executive. This 
UNIX-like system can support several 
users on the same mainframe. Each user 
has his own terminal and his own 
memory area (up to 60K each), but all 
users share the same CPU, printer, 
disks, and other hardware. To add an¬ 
other user to the system, the only hard¬ 
ware that's needed is another terminal, 
an I/O port for it, and, perhaps, another 
memory board. A system generation 
procedure must be followed to custo¬ 
mize the system for your particular 
hardware and software needs. 

NOS/MT provides all the features of 
the simpler Disk Executive, plus print 
output spooling, disk file simulation in 
memory, background batch capability, 
dynamic file space allocation up to 4 
billion bytes, directory files (hier¬ 
archical directory), hard disk drive sup¬ 


port, a system clock, and numerous ad¬ 
ditional features. 

If you’re looking for off-the-shelf ' 
business software to run on the M9900, ■ 
you’re in luck. The folks at Marinchip 
have converted the well-known Osborne 
commercial packages (General Ledger, 
Accounts Payable and Receivable, and 
Payroll) to QBASIC. These programs are 
usable singly or as an integrated system. 
Additionally, there’s a computer-aided 
drafting package called INTERACT, a 
terminal simulation program for com¬ 
municating with a remote computer 
system, and some more exotic languages 
— FORTH and META — for aficionados v 
of threaded structure and stack oper¬ 
ations. 

In future articles, we’ll take an in- 
depth look at some of this software. 


A Mini Editorial 


Now that 99'er Magazine is bringing 
together all formerly isolated TMS9900 
family members, we would hope to see 
hardware and software producers adapt¬ 
ing their products for these additional re¬ 
lated markets. The software from Marin¬ 
chip systems is a case in point: If TI-99/4 
users, for example, would like to see an 
extremely fast compiled BASIC (e.g., 
Q-BASIC) available on their fully-con¬ 
figured Tl system, the folks at Marinchip 
should be made aware of this by the in¬ 
terested users—Ed. 


Business & 

Professional 

Software 

File Management System 

300 records per disk, full upper 
and lower case, user-defined fields 
& printed formats. RAM sort 
(Shell-Hibbard), multi-key sub-file 
selection. $60 

Statistics Package 

Create data files & selective 
sub-files. Generate descriptive 
statistics, parametric & non-para- 
metric tests, linear regressions, & 
curve fitting. Tabular & graphic 
data output. $40 

For Order & Inquiries Contact: 

Frederick Marin 

Small Business/Professional 
Computer Services 

87 Mayfair Road 
Warwick, RI 02888 
Tel. (401)461-6308 
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OFF-THE-SHELF 16-BIT HARDWARE AND SOFTWARE 


16-BIT HARDWARE 

Why wait when you want a state of the 
art 16-bit microcomputer? At Marinchip 
Systems, we believe in being respon¬ 
sive to your needs. So when you want 
a system that delivers, call Marinchip 
Systems, because we have it in stock. 

* S-100 CPU board 

* TMS9900 microprocessor from 
Texas Instruments 

* Support for 8-bit and 16-bit memories 
and peripherals 

* Software included with CPU 

* CPU price-$700. 

* 64K byte memory with 16-bit access, 
bank-select for multi-user systems - 
$1050. 

* Quad StO board with four program¬ 
mable asynchronous or sychronous 
ports - $350. 

* Complete systems (except CRT) with 
1 Megabyte floppy disc storage - 
$5500. 

* Hard disc available. 

CBAStC is a trademark of Compiler Systems 

Marinchip Systems 


16-BIT SOFTWARE 

Because we’re a total computer 
company, we also carry our series of 
the most complete and flexible software 
systems available anywhere. So when 
you want the software that delivers, 
call Marinchip Systems, because we 
have it in stock. 

* Single-user Disc Executive - free 
with CPU 

* BASIC interpreter, relocatable 
assembler and linker, debug monitor, 
utilities - free with CPU 

* EDIT: Context editor with the same 
features found on UNIVAC, GDC, 

DEC systems - free with CPU 

* WORD: Document formatter with 
justification, page numbers, user- 
specified headings and footings, 
macro expansion, copy from disc, 
and more - free with CPU 

* WINDOW: Simplest, most powerful 
screen editor you can buy - $250. 

* Extended Commercial BASIC: inter¬ 
preter with 16-digit precision, 

Computer Power and Human Reason 
16 St. Jude Road 


Print Using, random access disc files 
-$ 120 . 

* PASCAL: Brinch Hansen’s Sequential 
Pascal - $150. 

* Applications: The Osborne General 
Ledger, Accounts Payable/Receiv¬ 
able, Payroll, full source in QBASIC - 
$150. each 

* NOS: Multi-useroperating system 
with byte-addressable device¬ 
independent files, hierarchical file 
system, read/write/execute pro¬ 
tection, print spooling, background 
batch, upward compatible from Disc 
Executive - $250. 

* QBASIC: Extension of CBASIC 2 TM 
that generates fast machine code for 
the 9900. New and unique options 
include fast binary I/O, separate 
compilation of functions, assembly- 
language functions - $220. 

* Documentation: CPU, free software 
package, PASCAL, NOS - $40 - 
applicable to purchase; QBASIC • $20; 
Applications - $25 each 

Mill Valley, CA 94941 

415/383-1545 


Advertising Design: Asterisk Associates 











By Lawrence Riley 


I nformation utilities such as The SOURCE and MicroNet 
allow any individual with a microcomputer and modem 
to tap into a rich vein of information resources. These 
databases, however, are aimed almost exclusively toward 
the general consumer population, and as such, cannot ade¬ 
quately cover the needs of serious, small investors. That’s 
where the Dow Jones News Service (DJNS) comes in : the 
combination of the DJNS and The T1-99/4 may be the 
most significant advance in investment analysis since the 
electronic calculator made its debut . . . 

Historical stock quotes are available, as are current-day 
quotes for all listed stocks, bonds, options and U.S. Treasury 
issues. 

For a comprehensive review of a stock or industry, the 
“Media General” database provides detailed technical and 
fundamental indicators on the item of your choice. 

The conservative investor can access the “Disclosure 
On-line” database for a profile on most major companies, 
plus a “10-K” report that lists almost all the important (to 
the investor) information that can be found in a corpora¬ 
tion’s financial statement. 

“The Money Market Service” database is a new service 
introduced by Dow Jones in February of this year. Com¬ 
mentary, tables and graphs on the economy are displayed 
for most of the important indicators used in determining 
the current business climate. Of course, the ever-popular 
Dow Jones averages are also available, as are Trading Activi¬ 
ty, The Market Diary, Market Volume, and many other val¬ 
uable market statistics. 

With everything there comes a price tag, and the news 
service is no exception. During the business day (6:00 a.m. 
to 7:00 P.M. EST) the charge for news is $1 per minute. 
After 7:00, this rate is reduced 80% ! Until the next morn¬ 
ing, news can be accessed for 20 cents per minute, and his¬ 
torical market quotes for 15 cents. The start-up fee for the 
service is $50, but there are no monthly charges or mini¬ 
mum on-line times. For high-volume users there is pricing 
option “A”. Under this option, there is a $50 monthly fee 
in exchange for lower prime-time rates during the business 
day. Pricing option "B” should be satisfactory for most 
individual investors. 


9756 Hadley Drive, Overland Park, KS 66212 


The Small Investor 

& the TI-99/4 

A LOOK AT THE 
DOW JONES NEWS SERVICE 


In my day-to-day use of the Dow Jones News Service, I 
have found no problems in accessing the system with my 
TI-99/4. When using the Terminal Emulator 1 (TE-1) 
module, the keyboard does occassionally lock up. But I 
have found that pressing the Shift-C key while simulta¬ 
neously holding the Shift-V key down, will bring the cur¬ 
sor back. After discovering this trick, I haven’t lost any 
data due to TE-1 lock-up. 

After news has been obtained on the News Service, there 
are really only two things that can be done with it: (1) it 
can be kept temporarily, or (2) kept permanently. News that 
is to be kept temporarily is best stored on a disk or printed 
copy for ease of access and readability. When keeping news 
permanently, cassette tapes, especially if bought in volume, 
can be both cost effective and reasonably efficient. 

For aspects of the service other than news, there are 
many different ways to use both the historical and current 
quote database. The historical quotes are available in either 
monthly or quarterly format for any given item. While a 
weekly format would be desirable, the monthly quotes can 
be used to determine most long and intermediate term 
trends. For the very short term, one month of daily quotes 
are always available. These can be used to develop a 10,15, 
or 20 day moving average of prices for the item being re¬ 
searched , and if saved over a period of time, can be used in 
any format. 

For the novice investor, the Media General Data Base 
provides a sufficient amount of both technical and funda¬ 
mental analysis. Fundamental Analysis refers to informa¬ 
tion concerning the aspects of a particular company or in¬ 
dustry such as assets, net worth, or earnings. Technical 
Analysis refers to the study of the chart or graph of a com¬ 
pany, industry, or the market in general-in the hope that 
past behavior as revealed in graphs can be used to predict 
future price movements. 

The serious investor may prefer to develop his or her 
own analytical tools. One current theory on Wall Street to¬ 
day is that about half of a stock's performance is due to 
movement of the market in general, and about half of the 
movement is due to characteristics peculiar to that particu¬ 
lar stock. Naturally, anyone that can predict the movement 
of the market, even for a short time, has a very powerful 
financial tool. 

For this reason, my own analysis tends toward analyzing 
the leading market indices. This analysis can be facilitated 
by the use of the TI Personal Record Keeping Command 
Module (PRK). Each page can be set up to represent one 
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day, and the first few lines can label the index to be tracked. 
The remaining lines can be the 10, 15, or 20 day averages of 
the aforementioned indices. The use of math transforma* 
tions in the PRK module allows the average to be computed 
for each of the indices, but the average must be entered 
manually with the “change page" option. One by-product 
of the average that is computed automatically by the PRK 
module is the standard deviation. I have found this statistic 
to be a good indicator of market volatility. It too can be 
entered and tracked with the average. The ability of the 
PRK module data to be analyzed by the Statistics Command 
Module is a definite plus for analysis. Even though the 
Statistics module is a more sophisticated analytical device, 
and offers more tools to work with than the PRK module, I 
do not feel that it is essential to index analysis-only help¬ 
ful. 

Investors with access to a TI-59 programmable calcula¬ 
tor as well as a T1-99/4 can perform some rather astounding 
mathematical computations without a strong math back¬ 
ground. Quotes can be obtained through the News Service, 
and used in a "Least Squares Curve Fit” program detailed 
in the Texas Instruments publication: Sourcebook for Pro¬ 
grammable Calculators. This will result in a series of simul¬ 
taneous equations which can be solved either with the 
Master Library-2 program on the TI-59, or with the Math 
Library program on the TI-99/4. In theory, the resulting 
equation should be a reasonably accurate description of the 


line the datapointswere taken from, and can be used to pre¬ 
dict the future behavior of the line. Naturally, the number 
and quality of the datapoints chosen determine the accura¬ 
cy of the predictive equation, and any conclusion drawn 
from such analysis is at best, highly speculative. 

Fundamental analysis using the TI-99/4 also has many 
applications. Balance sheet and income statement analysis 
can be programmed, and then compared to an “ideal” or 
average analysis to determine the variances in an effort to 
discover the strengths or weakness of a particular company 
or industry. The information for these analyses can be found 
in the 10-K section of the Disclosure On-Line Database of 
the News Service. 

Of course, these are only a few of the applications that 
can be put to use with the TI-99/4 and the Dow Jones News 
Service. In the past, this mathematical analysis of the mar¬ 
ket and it’s component stocks were inaccessible or simply 
incomprehensible to the small investor. But now with the 
help of your TI-99/4, a sophisticated approach is both avail¬ 
able and easy to use. 

In closing, I would recommend that any investor with a 
TI-99/4 computer call Dow Jones on their toll free number 
(800-257-5114 except N.J.) to request their free informa¬ 
tion packet detailing prices and services. 

Good luck 99’ers. If this works for you, your only prob¬ 
lem may be writing a suitable income tax program! 
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% three dozen computers with 
i^fcf irifbrrination in such sub- 
.9 astronomy,! education, ama- 


Jajhfltgames can be accessed 
&gg® through any computer 
^yifh i terminal‘emulation 
or terminal, by using; an or- 
rftej |)if business phone and 
^QCQn^rsion device called 
tdrttfAction, of Modu¬ 
li jy l^far-T-a d ©vice t hat 

igifcsl <cbdhputer data signals 
I lfelialsJ sent over the tele- 
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?ijUtrs are free’ter use and 
btf fijhavc time- limits, 
©its are*for long distance 


rttoli |ih| |)|i^r|ejchanges. Almost all 
'flhlW afc al sotayai fab te;eve ni ngs or 
reektrids wjifef) * rates are 

^WteWj^ll ’p^ppf costs are "paid 

qt| l by* sowrref/pperators (user 

a ' publishers; comrner- 
liness^i dedicated hobby- 
iMost * |y|tppis* don’t. request 
; although : some ; present 
cy&ifieiitiaf messages. CJsers also have 
^c|f|pfcirtiinity of placing any type 
4 *rjf©rr|i4tiop'fnto these computer 
ie|-|thds 1 forming a .national com- 
*te||i|He|uf board. ■ ■ 

| f4#yat(ohj *htCj/ a" modem manu- 
|C|if|rJ free dial-up directo- 

i w*t»'dafte;. listing of com- 
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puters available by modem , to any 
computer or terminal user. Call ,21:3? 
881 -6880, 24 hours a day, WKsp fhe 
welcome message appears/.;.’ 
LOGON PLEASE, type in the word 
CAT and press the Carriage Return 
or ENTER key on your computer or 
terminal. The video screen will dis¬ 
play an 18 item menu that dqntaihs 
product information, a glossary of 
computer terms, and a modem 
/printer test. Item 18 is the directory 
of free dial-up computers that isup- 
dated each month. Mahy of the list* 
ings are only for Apple or TRS8G 
users (indicated by “ABBS*’ and 
“FOR80”. AH other listings are ac¬ 
cessible with any other computer 
that is emulating a terminal through 
a 300 baud asynchronous modem 
that is compatible with Bell System 
100 series specifications 


CBBS Wash. DC 
CBBS Wash. DC. 
CBBS Seattle 
CBBS Seattle 
CBBS New York 
CBBS New York 
CBBS New York 
CBBS New York 


(202) 281-2125 (10, 2) 
(202) 337*4694 (10) 
(206)723-3282 
(206) 246-8983 
(212) 787-5520 (14) 
(212) 997-2186(7) 
(212) 933-9459 


CBBS New York (212) 245-4363 (10) 
CBBS Los Angeles (213) 954-8582 
CBBS Los Angeles (213) 291-9314 
CBBS Los Angeles (213) 826-0325 
CBBS Los Angeles(213) 881-6880 (10) 
(Novation Directory) LOGON with 

word . . .CAT 


CBBS Inglewood (213) 672-2206 
CBBS Philadelphia (215) 563-0674 
OBBS Macon (217)429-5505 
* ; ■; County IL 

CBBS Arlington Hts (312) 255-6489 


CBBS Chicago 
CBBS Chicago 
CBBS Detroit 
CBBS ST Louis 
CBBS ST LOiiis 
CBBS Atlanta 
CBBS Atlanta 
CBBS Portlan 
CBBS Portlan 


(312)767-0202(10) 

(312) 545-8086 (10) 

(313) 288-0335 (10) 

(314) 781-1308 
(314) 227-8495 
(404) 394-4220 (10) 
1404) 939-1520 (5,10) 
(503) 641-8555 
(503) 641-9029 


CBBS Long Island (516) 939-9043 


CBBS Phoenix 
CBBS Vancouver 
BC 

CBBS Ottawa (613)725-2243 
CBBS Nashville (615) 254-9193 (10) 
CBBS Cambridge (617)864-3819(10) 
CBBS Las Vegas (702) 454-3417 
CBBS Alexandria (703)620-4990 (10) 
VA 

CBBS Orange (714) 751-1422(10) 
county 

CBBS Fullerton (714) 526-3687 
CBBS Santee CA (7141 449-5689 (10) 
CBBS Vermont (802) 8794981 (7) 
CBBS Sacramento (916) 393-4459 (12) 


(602) 957-9282 
(604) 687-2640 (10) 


Codes: 

2 - Amateur Radio 
5 = Games 
7 B Education 
10 - 24 hour operation 
14 s Astronomy 
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Now You Can Access 
w Jones Investment Informat 
On Your Personal Computer 
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own an Apple, Atari, 
Commodore, Radio Shack, 
or other computer hardware sys¬ 
tem, you can now get on-line with 
Dow Jones Information Services. 

This database is filled with re¬ 
liable business and investment 
information fed directly from The 
Wall Street Journal, Barron’s, 
and the world-wide Dow Jones 
News Service. Having access to 
this business/investment database 
is like having a private stock 
ticker, financial consultant, and 
comprehensive business library 
right at your fingertips. 

Current Stock Quotes 

< 

With Dow Jones Information Ser¬ 
vices you can retrieve in-depth 
articles from The Wall Street 
Journal and Barron’s; get stock 
quotations—just 15 minutes de- 
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Stock Quotations For Over 
6,000 Companies 

Financial news from The Wall 
Street Journal and Barron’s 

50 Current And Historic 
Financial Indicators For 
Thousands Of Companies 


* / 




layed—for over 6,000 companies; 
receive 50 key financial indica¬ 
tors and historic earnings and 
dividend figures on selected com¬ 
panies. . .even update, manage, 
and evaluate your personal port¬ 
folio with the Dow Jones Portfolio 
Management Series! And, you 
can do all of this at your conven¬ 
ience, in the privacy of your 
home or office. 

News. . .90 Seconds To 

90 Days 

To make sound business and in¬ 
vestment decisions, you need in¬ 
stant access to and retrieval of 
vital business information. With 
Dow Jones Information Services, 
you get this information—as re¬ 
cent as 90 seconds, as far back as 
90 days—when you need it, 21 
hours a day. Plus when you get 
on-line with Dow Jones, there’s 
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no minimum 
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access charge 

O ,-j 

or subscription fee. . 

If you’re serious about invest¬ 

ments and would like to have die 
information-gathering resources; 
of Dow Jones at your command* 
visit your computer store for > 
demonstration or call us today. 




For More Information Call Toll Free (800) 257-5114 

(In New Jersey, cadi (.609) 452-1511) v 7 




INFORMATION 




FQ. Box 3GQ 
Pfcmceian, Nj 08540 



















DATA 


COMMUNICATIONS 
& the TI-9 9/4 


By F. T. Berkey 


I f you have invested in an RS232 
interface and a modem in addition 
to your TI-99/4 system, you have 
the possibility of tapping a vast informa¬ 
tion network through existing and 
planned computer time-sharing services. 
A variety of information services such as 
news, financial information, computer 
games, various data bases, and program 
exchange, to name just a few, are pro¬ 
vided through information utilities such 
as The Source (by Source Telecomput¬ 
ing Corporation) and MicroNET (by 
CompuServe). TEXNET, a collaboration 
between Source Telecomputing Corpora¬ 
tion and Texas Instruments, will enhance 
data base services with the addition of 
text-to-speech, color graphics, and mu¬ 
sic. This service will be available exclu¬ 
sively to users of the Tl-99/4. Since it 


will be some time, however, before the 
prospect becomes fully implemented 
[see Information Utilities & the Electro¬ 
nic Cottage in this issue], we'll start this 
series of articles with an examination of 
basic data communications between the 
Tl-99/4 and other computers. 

Data Communications Concepts 

A number of coding schemes have 
been devised to represent characters in 
order to input information into a com¬ 
puter. The most widely used code is the 
American Standard Code for Information 
Interchange—more commonly known as 
ASCII code. It is a 7-bit code which can 
represent 128 character configurations. 
Figure 1 illustrates the bit patterns asso¬ 
ciated with each of the characters. An 
eighth bit, called a parity bit, is com¬ 
monly included in the ASCII code. The 
parity bit is used to detect errors in the 
bit stream which might be due to the 
reading or transmission of the data. Pari¬ 


ty of a ASCII coded signal can be odd 
or even. An ASCII code with even pari¬ 
ty must contain an even number of ones; 
for odd parity the number of ones must 
be odd (i.e., 1, 3, 5, 7). Examples of 
other codes are the 5-bit Baudot code, 
the 6-bit Binary Coded Decimal (BCD) 
code and the 8-bit Extended Binary 
Coded Decimal Interchange Code 
(EBCDIC). These codes use different bit 
patterns to represent characters than 
does the ASCII code. The Texas Instru¬ 
ments Terminal Emulator 1 (TE-1) Com¬ 
mand Module enables you to tailor your 
Tl-99/4 to fit the characteristics of the 
remote computer system. With the com¬ 
munications device menu, you can spec¬ 
ify the parity of the received or trans¬ 
mitted signal—odd (default), even, or 
none (no parity bit)—and set the num¬ 
ber of data bits at 7 (default) or 8. 

The actual number of bits transmit¬ 
ted is larger than the number of bits in 
the code. “Housekeeping” bits are added 
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DATA BITS 


MARKING STATE 


DATA BITS 


Figure 2. 


CO 

CD 

D 

Q. 







minimum 



l 


CD 

O 

CD 

< 

CD 


STOP BITS 


START BIT 


STOP BITS 


START BIT 


both before and after the bits which 
represent the character code. The addi¬ 
tional bits are called start and stop bits. 
A single start bit is added at the front 
of the code as a signal to advise the re¬ 
ceiving device to start sampling the in¬ 
coming signal. Stop bits, added after the 
character code, indicate when the code 
is finished, and reset the device for rec¬ 
ognition of the next start bit. For an 
ASCII coded signal, 11 or 12 bits are 
typically transmitted (see Figure 2). 

In data communications terminology, 
a full duplex channel implies that in¬ 
formation can flow in two directions 
simultaneously. On a half duplex chan¬ 
nel, the information can flow in both 
directions, but not simultaneously. If 
you select the half duplex mode from 
the TE-1 communications device, menu, 
(and set the modem accordingly), the 
characters you send will be “echoed” 
back to your monitor or TV set, and 
appear on the screen. The echoed or 
extra character does not occur if full 
duplex is selected. 

The public telephone network pro¬ 
vides means of communication from 
your T1-99/4 to another computer or in¬ 
formation service. The information or 
bit stream that your computer sends 
and receives, travels serially through the 
network. That is to say that the bits 
making up a character are sent and re¬ 
ceived one after another. Serial trans¬ 
mission is not the only mode in which 
data can be transferred. Inside your 
TI-99/4, data bits are transmitted in 
parallel; all eight or sixteen bits are trans¬ 
ferred simultaneously from point A to 
point B. Parallel transmission can also 
be used to transfer information between 
computers, however, it is more complex 
to do so and therefore more expensive 
■ than serial transmission. 

There are a variety of modes of data 
transmission. Your modem transmits 
data asynchronously. This means that 
each character is sent independently of 
any other character, and that the data 
bits are preceded by a start bit and fol¬ 
lowed by at least one stop bit. Synchro¬ 
nous transmission requires that both the 
sending and receiving modems are syn¬ 
chronized by a clock signal. The rate at 
which data is transmitted (or received) 
is termed the baud rate. The formal def¬ 
inition of a baud is that it is the recipro¬ 
cal of the length of the shortest pulse 
used to create a character. Since all the 
bits of the .ASCII code are equal in 
length, the terms “bits per second” and 
“baud” can be used interchangeably. A 
baud rate of 110 requires a minimum of 
2 stop bits; at 300 baud a minimum of 1 
is required. The TE-1 software allows 
you to choose between three baud rates 
(110, 300 or 600), but your modem 
limits your use to either 110 or 300. 
The R.S232 interface also allows you to 
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use baud rates of 1200, 2400, 4800 or 
9600. The higher rates can be used to 
output data to a printer or to send data 
to another TI-99/4 connected directly 
to your system. 

The function of your modem is to 
convert the binary pulse train (Is and 
0s) from your computer to some form 
of analog signal (tones) that can be 
transmitted over a telephone line. You 
will note that in the transmit mode your 
modem emits a continuous tone. This 
tone is called the carrier signal. When 
sending data from your TI-99/4, the 
modem’s function is to modulate (vary 
the amplitude or frequency) this carrier 
signal. It also works in the opposite sense 
by demodulating the carrier, so that the 
ASCII code sent to your TI-99/4 can be 
properly interpreted. Thus, the term 
“modem” is derived from the two words 
which describe its function: Modulation 
and DEModulation. A common modula¬ 
tion technique is called frequency shift 
keying (FSK). This technique converts 
the binary pulses from the computer to 
two tones of different frequency. For 
example, if the carrier signal has a fre¬ 
quency of 1500 Hz, a 1 would be trans¬ 
mitted at 2000 Hz and a 0 at 1000 Hz. 


Terminal Emulator 1 Command Module 

The TE-1 Command Module imple- | 
ments all 128 characters of the standard 
ASCII code which is illustrated in Fig- 
gure 1. The TI-99/4 keyboard is not en¬ 
coded with the lower case character set, 
but lowercase can be easily invoked by 
depressing SHIFT V, then 1. It’s also 
possible to send any standard ASCII 
control characters (used for signaling a i 
remote computer or device to perform a . 
predefined function), and display lines 
containing more than 40 text or pro- ; 
gram characters by “wrapping” the ex¬ 
tra characters onto a second line. The 
most powerful feature of the TE-1 is the 
ability it gives users to store received da- i 
ta on tape or disk. You can review this j 
data after logging off the remote com- f 
puter, and can also send it to a printer | 
or another computer. 

i i 

■ 

i 

; > 

Data Communications ' 

Using Basic Language Programs 

: _ 

The format of the data stored by the 
TE-1 is ASCII (display format) and is of j 
variable record length with a maximum 
of 192 bytes (characters). In order to j 


i n i .. i ■ . ' . d' fn. i .. i i i fir. i > 



make further use of the information, it 
is necessary to write programs using 
BASIC. A simple example of such a pro¬ 
gram is shown in Figure 3. Line 130 
opens a saved disk file using the OPEN 
statement. The following line inputs an 
ASCII character string; if the record de¬ 
notes the end of file (EOF), the program 
ends. Otherwise the number of charac¬ 
ters is found using the length function 
(LEN) statement. A new character string 
is created in line 170 using the string 
segment function (SEG$) where the last 
position of the character string is defined 
as N, the number of characters in the 
string. The character string is displayed 
on the monitor or TV, and the program 
returns to the INPUT statement (line 
140) and continues to read the data file 
until an EOF is detected. 

Often data retrieved from another 
computer or information service con¬ 
tains lower case ASCII characters. Since 
the T1-99/4 BASIC recognizes only up¬ 
per case characters, the program of Fig¬ 
ure 4 will insert the patterns stored in 
memory at the locations corresponding 
to decimal codes 97-122. Using the 
CHAR subprogram, the lower case char¬ 
acters can be defined as codes 97-122. 
For example, a lowercase A is given the 
character code 97 and the pattern iden¬ 
tifier "00003008384830)0.” The pro¬ 
gram listing in Figure 4 adds the lower 
case characters to the program listed in 
Figure 3. These patterns can be modi¬ 
fied or improved by using the character 
definition program listed on pages 186 
and 187 of the User's Reference Guide 
(Note that line 510 of that program in 
early printings of the book contains an 
error: B(R,2)*4 should read B(R f 6)*4), 
or the lowercase subroutine in Tl’s 
Programming Aids 1. 

Display formatted files can be sent 
from your T1-99/4 to another computer 
under control of the BASIC listing shown 
in Figure 5. The program assigns file 
number 1 to the indicated disk filename, 
and file number 2 to port 1 of the RS232 
interface. Each record or character string 
is input from the disk, displayed on the 
monitor, and then transmitted to the re¬ 
mote computer. Of course, this assumes 
that a means of recording this data is 
resident on the remote computer. This 
program could be used, for example, to 
efficiently transmit a pre-recorded mes¬ 
sage or text file to another home com¬ 
puter. 

The program listings in Figures 3, 4 
and 5 have a common flaw; if the dis¬ 
play file being read contains commas, 
the character string will be terminated 
by the first comma encountered. This is 
due to the fact that BASIC interprets 
a comma as a separator between charac¬ 
ter strings or data items in display for¬ 
matted data. (See page 158 of the User's 
Reference Guide.) This flaw can be 
overcome only if the file is created from 


BASIC and the procedure to do so is 
discussed on page 159 of the User’s Ref¬ 
erence Guide. 

BASIC programs can also be trans¬ 
mitted to another computer through the 
use of the LIST command. After read¬ 
ing the program into the RAM memory 
of the TI-99/4 using the OLD command, 
the command LIST “RS232” will send 
the program listing through port 1 of 
the RS232 interface to the modem or 
other device connected to the interface. 

In future articles, we’ll examine other 
aspects of data communications, profile 
various communication services, and re¬ 
view the new Terminal Emulator 2 


software along with its exciting reason 
for existence—TEXNET. Reader input is 
welcomed. 
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100 REM ** PROCRAM DECODE ** 

110 REM READS IN A DISPLAY DATA FILE SAVED WITH THE TERMINAL EMULATOR AND OUT? 

UTS IT TO THE MONITOR 

120 INPUT “ENTER FILE NAME: “:FN$ 

130 OPEN #10:"DSK1."&FN$,VARIABLE 192,DISPLAY 
140 INPUT #10:X$ 

150 IF £OF(10)THEN 200 
160 N-LEN(X$) 

170 M$-SEG$(X$,2,N) 

180 PRINT M$ t-,. -3 

190 GOTO 140 ? lgure J . 

200 END 


100 REM ** PROGRAM DECODE ** 

105 REM READS IN A DISPLAY DATA FILE 
TS ITTO THE MONITOR 
110 CALL CHAR(97,“O0OO3OO838483COO") 
115 CALL CHAR(98,"0020203824243800“) 
120 CALL CHAR(99,"0000182420241800") 
125 CALL CHAR(100,"0008083848483800“) 
130 CALL CHAR(101,"000018243C201COO") 
135 CALL CHAR(102,"3028207020202000") 
140 CALL CHAR(103,"00001C24241C0418") 
145 CALL CHAR(104,"0020203824242400") 
150 CALL CHAR(105,"0800180808081C00") 
155 CALL CHAR(106,"0800080808281800") 
160 CALL CHAR(107,"0020242830282400") 
165 CALL CHAR(108,"0018080803081COO") 
170 CALL CHAR(109,"00001C2A2A2A2200") 
175 CALL CHAR(110,"0000382424242400") 
180 CALL CHAR(111,"0000182424241800”) 
185 CALL CHAR<112,"0000382438202000") 
190 CALL CHAR(U3,"00001C241C040400") 
195 CALL CHAR(114,"0000283420202000") 
200 CALL CHAR(115,“0000182010083000") 
205 CALL CHAR(116,"0010381010140800") 
210 CALL CHAR(117,“0000242424241800") 
215 CALL CHAR(113,“0000222222140800") 
220 CALL CHAR(119,“0000222A2A2A1400") 
225 CALL CBAR(120,"0000221408142200") 
230 CALL CHAR(121,“0000221408080800") 
235 CALL CHAR<122,"0000380810203800") 
240 INPUT "ENTER FILE NAME; ":FN$ 

245 OPEN #10:"DSK1."4FN$,VARIABLE 192 
250 INPUT #10:X$ 

255 IF E0F(10)THEN 280 
260 N-LEN(X$) 

265 M$-SEG$(X$,2,N) 

270 PRINT M$ 

275 GOTO 250 
280 END 


SAVED WITH THE TERMINAL EMULATOR AND OUTPU 


Note 1: 

The problem of using commas 
(and quotation marks) with the 
INPUT statement, as discussed 
in this article, has been remedied 
by the LINPUT statement of 
Extended BASIC. With LINPUT, 
there is no editing of what is 
input. 


Note 2: 

The new TI-99/4A console has a 
lowercase character set already 
built in. 


DISPLAY 


Figure 4. 


100 REM ** PROGRAM FRIDISPLAY ** 

110 REM **TRANSMIT DISPLAY FILES TO A PDP 11/70** 

120 CALL CLEAR 

130 INPUT "ENTER FILENAME:":FN$ 

140 OPEN #1:"DSK1."&FN$,VARIABLE 192,DISPLAY 

150 OPEN #2:“RS232.PA-N.DA-8»EC.TV.NU".DISPLAY ,VARIABLE,OUTPUT 
160 INPUT #1:X$ 

170 N-LEN(X$) 

180 M$-SEG$(X$,2,N) 

190 NREC-NREC+1 
200 PRINT NREC;N;M$ 

210 PRINT #2:M$ 

220 IF EOF(l)THEN 240 
230 GOTO 160 
240 END 


Figure 5. 
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Getting Down 

to 

p 

Business 

By George Struble 



Evaluating A Software Package 

n last issue’s column I defined two 
categories of computer applications 
for business: (1) planning—concerned 
mostly with projections, and not having 
to be done at particular moments at peril 
to a business; and (2) integrated use- 
applications such as invoices, accounts 
payable and receivable, mailing list 
maintenance, general ledger, inventory, 
or any of many others upon which a 
business crucially depends at particular 
times. In this article, we’ll explore some 
of the implications of integrated use. 

Programs for integrated use are likely 
to be rather extensive. After all, most 
such applications involve organization 
and management of significant quanti¬ 
ties of data. This means that the pro¬ 
grams must help you with the data entry, 
help you monitor the validity and cor¬ 
rectness of the data, and help you 
update the data. The programs must 
also be able to retrieve data for process¬ 
ing, summarization, and answering in¬ 
quiries. Depending on the application, 
the programs may also have to generate 
auditable controls and provide tax 
reports. 

The programs for an integrated use 
application must be well-designed and 
form what we would call an informa¬ 
tion system. To develop such a system 
takes a substantial amount of work— 
probably several months , if not years, 

About the Author 

George Struble, a professor of computer 
and information science at the University of 
Oregon , is author of Business Information 
Processing with Basic, Addison-Wesiey Pub¬ 
lishing Co. t 1980 , 


of programmer time. If your application 
is small enough for you to think about 
doing it on a TI-99/4 or other micro, it 
would be quite a mismatch of investment 
for you to pay for even six months of a 
programmer’s time to develop a system. 
Therefore, you will want to buy a sys¬ 
tem that is already developed, packaged, 
and ready to install and use. You actual¬ 
ly have a better chance of getting a good 
working product by buying a package, 
than by having it done to your specifi¬ 
cations by a programmer. 

OK, you’re in the market for a pack¬ 
age. Besides cost, the most obvious cri¬ 
terion is whether a proposed package 
will meet your needs. Now is the time 
—even before seeing the details of a pro¬ 
posed package—to make yourself a 
checklist of the features you want your 
package to include. List each processing 
action that you think would be necessa¬ 
ry in your system. Consider the data 
elements you think would have to be 
stored and related to each other in order 
to provide the information you will need 
at any moment. If done in a detailed 
and comprehensive way, this would be 
close to what we would call a systems 
analysis of your application. 

Great detail and comprehensiveness 
are not needed; the idea is to give you a 
starting point for judging the adequacy 
of a package you may be offered. You 
will probably find that a particular pack¬ 
age is organized differently and does its 
activities differently from your outline. 
There’s nothing wrong with that. Con¬ 
centrate on the results produced and 
whether they are appropriate: Does the 
proposed package provide the informa¬ 
tion you consider essential? Then, of 


course, you can also judge whether the 
proposed package is convenient or awk¬ 
ward, and flexible or rigid. 

A second suggestion is to talk to 
other users of the proposed package, 
and get their opinions of the package’s 
strengths and weaknesses. You may be 
surprised how willing other users are 
to share their experiences. Even if you 
have to phone a couple of users long¬ 
distance, it will be well worth the 
trouble and cost. 

You should not expect your needs in 
an information system to always remain 
the same. Your business changes; audi¬ 
tors make new demands; federal or state 
regulations change. This is where flexi¬ 
bility of a system comes in. Chances are, 
that there will come a time when you 
will want your system to do something 
it was not designed to do. Then, you 
will need help in modifying the system. 
The supplier of the package is in the 
best position to know how to modify 
your system. But will he be around 
when you need him? Find out whether 
the source program is supplied and ac¬ 
cessible to you. If it is, then you have a 
chance of getting someone near you to 
modify it when needed. Try to find out 
from the supplier and users how much 
trouble a minor modification would be. 
You may not be absolutely able to trust 
an answer you get, but a judgement of 
modifiability is a hard problem, and this 
is the best suggestion I can make. 

In my next article I will review some 
business-related software. This will pro¬ 
vide an opportunity for some more 
specific suggestions in the analysis of a 
package. 

Now let us turn our attention to 
something more tangible—a program 
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GAMES & SIMULATIONS by PCJTCJRH 



CASINO PACK $19*95 

Slot Machine; Craps and Blackjack 

ALL-STAR BASEBALL* $29*95 

Pitching, fielding and base-running aFI under player control 

CHALLENGE l $19,95 

Leaping frogs in two mind-challenging games 

CHALLENGE II $19.95 

Nirn and Tic-Tat-Toe with a new twist 

DR* NUTTIER*** $19.95 

Converse En plain English with your computer as you seek 
professional counseling 

WALL STREET* $19*95 

Play the stock market and become a millionaire or a pauper 

GRAN PRIX $19*95 

Bet on the race as four cars maneuver a circuitous track 


SAM DEFENSE 

Command an authentic surface-to-air missile site 

GALACTIC WAR** 

Fast action space battle 


$29.95 

$29.95 


*Also in Extended Basic 
Extended Basic only 
***Diskette only 


+ * i 


SUPPLIES: 

C-10 Cassettes 
1-9 
10-19 
20 + 

Verbatim Minidisks with hub rings 
Box of 10 


$1*00 Ea 
.80 Ea 
.70 Ea 


$35.00 


HOUSEHOLD 
INVENTORY 
SYSTEM 

$59.95 

With this award-winning program you 
can accurately inventory personal 
property, calculate actual replacement 
value, and maintain records on a cur¬ 
rent basis 




BUSINESS SOFTWARE 


$139*95 
$149.95 
$149.95 
$ 99.95 
$ 99.95 
$139.95 
$ 49.95 


General Ledger 
Accounts Payable 
Accounts Receivable 
Payroll 

Inventory Management 
Word Processing 
Mailing List 

Fully interactive programs offer a totally 
integrated accounting system. 

Loaded with innovative features: 

— Completely menu-driven 

— Random accesS of data 

— Choice of retrieval of account records by name 
or number 

— Fully prompted input 

— Guaranteed to be bug-free and opera tor-proof! 

— Hot-line and enhancement update service available. 

Purchase units individually or the entire package 
for 649.95, 

Write for full details. 


ORDERING INFORMATION: All orders shipped postpaid 
within 48 hours. Please enclose payment with order. For 
orders outside North America ada 10% for postage and 
handling, 

Add $2.50 for postage on supply orders. Texas residents 
add 5% sales tax. 


Ask for FUTURA Software at your local software dealer. 
Write for detailed description of these and other pro¬ 
grams from FUTURA. 


Dealer Inquiries Invited 



puTunn 

SOFTWARE 


jHvj| 

Ehninger Associates. Inc 

RO. Box 5581 
Fort Worth, Texas 76108 
817/246-6536 


DISK DRIVE WOES? 
PRINTER INTERACTION? 
MEMORY LOSS? 

ERRATIC OPERATION? 

Don’t 
Blame The 
Software! 





** 


ISO-1 


Power Line Spikes, Surges & Pat ?( - q 7nc , ISO-2 

Hash could be the culprit! rai ’ 

Floppies, printers, memory & processor often interact! Our 
patented ISOLATORS eliminate equipment interaction AND curb 
damaging Power Line Spikes, Surges and Hash. 

ISOLATOR (ISO-1) 3 filter Isolated 3-prong sockets; Integral 

,1 KWI 


Su 


ilfce Suppression; 1875 W Maximum load, 


load any 
.. $62.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; (6 

sockets total); Integral Spike/Surge Suppression; 1875 W Max 
load, 1 KW either bank.$62.95 

• SUPER ISOLATOR (ISO-3), similar to ISO-1 except double 

filtering & Suppression.$94.95 

• ISOLATOR (ISO-4), similar to ISO-1 except unit has 6 

Individually filtered sockets.$106.95 

• SUPER IS6LATOR (ISO-11) similar to ISO-2 except double 

filtering & Suppression.$94.95 

• CIRCUIT BREAKER, any model (add-CB).Add? 8.00 

• CKT BRKR/S WITCH/PI LOT (CBS).Add $16.00 

AT YOUR Master-Card, Visa, American Express 

DEALERS Order Toll Free 1-800-226-4876 

(except AK, HI, PR & Canada) 


Electronic Specialists, Inc. 

171 South Main Street, Natick , Mass 01760 

Technical & Non-800: 1-617-655-1532 



Graphics Worksheets 

Designed to make graphics 
easier to program. 

pack of 15 $1.00 

pack of 100 $6.00 


Software 

These quality programs 
are only $2.00 each. 

2x2 Matrix determination 
3x3 Matrix determination 
Acceleration-rocket program 
Circle from three points 
Derivative of a function 
F reef all-falling body 
program 

Hydrocarbon combustion 
program 

Hyperbolic functions 
Quadratic equation 
Sigma function 
Vector dot product 
Vector cross product 


DATA SYSTEMS 

2214 W. IOWA 
Chicago, IL 60622 
Tel. (312) 235-2699 


Mini - 

Programs 

These short (usually SO 
lines or less) programs can be 
used as is, or can be incorpo- j 

rated into 

your own pro - 

grams. Each is only $0.75 

Graphics — Flags 

choose from the countries 

below 

Andorra 

Ireland 

Argentina 

Italy 

Austria 

Ivory Coast 

Belgium 

Libya 

Bolivia 

Luxembourg 

Chad 

Mali 

El Salvador 

Mexico 

Ethiopia 

Netherlands 

France 

Nigeria 

Gabon 

Norway 

Greece 

Peru 

Guatemala 

Switzerland 

Guinea 

Upper Volta 

Hungary 

United States 

Iran 

West Germany 

Graphics pictures 

TIE Fighter 
Spectacular 

Grid 


MINIMUM ORDER iS $15.00 
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that should be of practical use to many 
of you. 

Effective Interest Rate 

or 

Return On Investment 

Suppose you have an opportunity to 
buy an investment for $1500. The in¬ 
vestment is expected to pay $140 at the 
end of each of the next five years, and 
at the end of five years return a lump 
sum of $2000. What is the effective in¬ 
terest rate or total yield on this invest¬ 
ment? Or, put another way, what is the 
return on this investment? This problem 
can be stated in terms of capital in your 
business: If you invest some amount in 
a certain piece of equipment or in a 
higher level of inventory or ... , you ex¬ 
pect some estimated improvement in 
revenues. What is your expected return 
on this investment? 

Since you have many opportunities 
and a limited amount of capital, you 
need to compare the expected rates of 
return on each of several opportunities 
in order to be able to make the best 
decision. Of course, there are usually 
intangible benefits too, as well as varia¬ 
tions in the risks of different invest¬ 
ments. A return on investment calcula¬ 
tion is, therefore, not the only—or neces¬ 
sarily the deciding—criterion in your 
decisions. Nevertheless, it will certainly 
provide valuable input to your decision 
-making process. 

The program presented here is a rela¬ 
tively simple one. I define a component 
of the investment as one or more pay¬ 
ments of equal amount made at regular 
intervals. An investment will have two 
or more components; they are the main 
input to the program. Each component 
is described by: 

(a) the amount of each payment (there 
may be only one). 

(b) the time at which the first of these 
payments is made. Time is measured 
in months from the current mo¬ 
ment, which is understood to be 
time zero. 

(c) the number of months between pay¬ 
ments. This is irrelevant if there is 
only one payment in a component, 
but we require a number anyway. 

(d) the number of payments in this 
component. 

For instance, the example above in¬ 
cludes three components: 



(a) 

(b) 

(c) 

(d) 

1st Component 

1500 

0 

1 

1 

2nd Component 

- 140 

12 

12 

5 

3rd Component 

-2000 

60 

1 

1 


Note that the investment amount is 
given as a positive number, but the 
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returns on the investment are given as 
negative numbers. The second compo¬ 
nent represents the five annual pay¬ 
ments (12 months apart) starting 12 
months after the current time. The first 
and third components represent single 
payments: the initial payment and the 
final payoff after five years (60 months). 

The program makes provision for up 
to ten components; the number of 
components is the first input the pro¬ 
gram asks for. 

The program strategy is to compute 
the residual present value at an interest 
rate higher and one lower than the ef¬ 
fective interest rate. We use an interpo¬ 
lation formula to produce a better esti¬ 
mate to the effective interest rate, then 
narrow the range of possible effective 
interest rates, and repeat the process. 
The program stops when the residual 
value is less than some fraction of the 
total of the numbers used in computing 
the residual value, or when the range of 
possible effective interest rates is less 
than some tolerance. There are four pa¬ 
rameters set in statements 200-230 of the 
program that you may want to change, 
depending on your requirements: 

U9= starting upper bound for effective 
interest rate, set now at 30%, 

L9 = starting lower bound for effective 
interest rate, set now at 0%. 

T9 = tolerance for range of effective 
interest rate, set now at .05%. 
When the possible range is less than 
this, we conclude you have the rate 
closely enough. 

P9 = tolerance for residual present 
value, set now at .0001. Because of 
round-off error during the calcula¬ 
tions, this tolerance should not be 
reduced much below this value. 

Figure 1 shows a transcript of the ex¬ 
ecution of the program with the sample 
data given above. 

Note that the program uses a subrou¬ 
tine starting at line 720; a parameter R 
is supplied to the subroutine, and para¬ 
meters V and V3 are returned. If you 
have Extended BASIC, you can make 
these parameters explicit in the subrou¬ 
tine call. You can also rephrase some of 
the control structures using IF-THEN- 
ELSE and multi-line statements, and 
make the program much more readable. 
I leave this for you to explore. 

Lease vs. Purchase Analysis 

Quite complex programs are available 
to do an analysis of whether leasing or 
purchasing some piece of equipment is 
more advantageous. The effective in¬ 
terest rate program can be used for a 
lease vs. purchase analysis, though it re¬ 
quires you to do some side calculation. 
One way to do the analysis would be es¬ 
sentially to calculate the return on 
purchasing the equipment and leasing 
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ENTER NUMBER OF PAYMENT 
COMPONENTS? 3 

ENTER AMOUNT OF PAYMENT? 1500 

ENTER TIME OF FIRST OF THESE 
PAYMENTS? 0 * 

ENTER PER IOD BETWEEN THESE , 
PAYMENTS, IN MONTHS? 1 ' // 

ENTER NUMBER OF THESE 
PAYMENTS? 1 < >• 


ENTER AMOUNT OF PAYMENTf *-440 
ENTER TIME OF FIRST OF THESE 

f AXMfNtS? .12/ * / '// // /" ■// 

ENTER PERIOD BETWEEN TH#5^ 
PAYMENTS, IN MONTHS? 12 

ENTER NUMBER OF THESE 
PAYMENTS? 5 
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% 
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ENTER AMOUNT OF PAYMENT? -2000 

ENTER TIME OF FIRST OF THESE V 
PAYMENTS? €0 / • / •/ 

ENTER PERIOD BETWEEN THESE / 
PAYMENTS, IN MONTHS? 1 

ENTER NUMBER OF THESE 
PAYMENTS? 1 


RESIDUAL PRESENT VALUE AT 
0% IS —1200 

RESIDUAL PRESENT VALUE AT 
30% IS 731.7656652 / 

RESIDUAL PRESENT VALUE AT 
18.63580073% 4$ 290.8235145 

BESIDUAL PRESENT VALUE At 
15,00040794% IS 93.29345296 

Residual present value at 

13.91833345% IS 27.69506322 

RESIDUAL PRESENT VALUE At 
13.60435554% IS 8.02691232 

RESIDUAL PRESENT VALUE AT 
13.5139594% IS 2.31016p891 

RESIDUAL PRESENT VALUE AT 
13.48799321% IS .6635205927 

RESIDUAL PRESENT VALUE AT 
13.48063936% IS .1904640003 

EFFECTIVE INTEREST RATE, 
COMPOUNDED MONTHLY, IS 
13.48053936 


% 
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it back to someone else. You would 
include the j 

• cost of purchase (+) i 

• tax benefits from claimed deprecia¬ 
tion (-) j 

• lease payments (—) j 

• maintenance cost, if maintenance is 
provided under the lease (+) 

• any difference in insurance or other 

costs between purchasing and leasing 
(+ or —) ? 

• expected cost of purchase at the end] 

of lease period (—) or trade-in value! 

at the end of lease period (—} j 

The rate of return indicated by this anal-; 
ysis can be compared with your borrow¬ 
ing cost, and the comparison would give, 
you an indication of whether purchase] 
or lease would be more advantageous to > 


you. 

As a small example, suppose you are' 
going to get a widget-grinder. You can 
buy it for $12,000, or lease it for three] 
years at $300 per month. No mainte-' 
nance is involved, and the insurance cost 

Continued on p. 75 




KELLEY’S 


CATCH & MATCH 



GAMES 

in 

TI BASIC 

& 

Extended 
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1r4 allTlie educational and technical stuff you've been feaHnf 
Jtl.ia the rest of this magazine. Sure, it's been interesting and idfor^ 
*1 * matlve ,». But you need some fun too! Right? Relax then. You 're 
ierrhxry; now: Kelley’s Korner —the place for great graphic 
games lUCsensational simulations. 




„ * f Or this issue, the, official travel brochure says that Pm supposed 
to ieadr ypu' on an excursion into the world of "static pattern match¬ 
ing”'and dynamic coincidence.” But ’tween you and me, what we're 
really jgpHna do is hatch a batch of "catch & match” games. 

y, Sol git ready to battle your computer for supremacy of the seven 
Mp the harried housewife handle her housework, and sprint 
after th6|e spectacular shifting sprites. It’s time to begin ... * 

t '1 Battle Stations ! Battle Stations ! 


£■ ^S- Cs 


Battle At Sea 

By W.K. Balthrop 

D " amn the torpedoes! Full speed 
ahead ...” Get ready, all you 
"armchair admirals” out there in 
99’erland. You’re about to do battle 
with the most crafty enemy of all—the 
Imperial TI Fleet. If you’re old enough 
to remember those rainy Saturdays in 
the pre-TV age, you’ve probably spent 
many an hour with pencil and paper 
playing Battleship . In the intervening 
years, Battleship has been dressed up as 
a consumer item in many forms: First it 
was “cardboardized,” then “plasticized,” 
and finally “electronicized,” Well gang, 
as it happened, one rainy Saturday 
afternoon a few months ago, I had this 
mad urge to play Battleship . . . The ex¬ 
pensive electronic version looked really 
enticing in a local toy store display, but 
I sure wasn’t going to spring for it— 
especially when I had my trusty TI-99/4 
personal computer waiting to carry out 
my every command.So program it I did. 
The result: Battleship has now been 
“99’erized” into a 16K TI BASIC ver¬ 
sion, which I call Battle At Sea. 

Two 10 x 10 grids are displayed on 
the screen along with the row and col¬ 
umn designations. The computer will 


ask you to enter coordinates for the 
placement of each of your ships on the 
grid at the right. Each coordinate must 
be entered separately; for example A 5 
then A 6 for the destroyer. Since the 
ships occupy different numbers of grid 
squares, I’ve put in a counter for each 
ship to indicate how many remaining 
squares that must be entered. 

After all the coordinates for a ship 
have been entered, that ship will be dis¬ 
played on the screen. Once all five ships 
are set up, the computer will secretly set 
up its own ships on the grid to the left. 
You won’t be able to see the computer’s 
ships, since the whole idea of the game 
is to try to find them. 

Once the computer has set up its 
ships, it will ask you for the coordinates 
of your shot at its grid (on the left). 
You must enter your shot as a row let¬ 
ter, then a column number. Valid coor¬ 
dinates are from A-J and from 0-9. Any 
other entry will result in having to enter 
the coordinates again. Your hit or miss 
will be marked on the grid and displayed 
at the bottom of the screen as a MISS or 
**HIT**. The computer will then take 
a shot at your grid. It cannot see your 
ships, but it does keep track of where 
the hits and misses are. 

After a hit, any ship that has been 
sunk will be displayed at the bottom of 
the screen. The score is also updated at 
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this time: one point for each ship sunk. 
The first player to sink all five ships will 
win the game. 

Because there are no moving objects 
in this game, speed was not the most 
important factor in the game design.The 
action happens to be fairly fast, but the 
critical factor was programming the 
computer to make intelligent decisions. 
With no limit on available memory, I 
might have been able to write a program 
with flawless logic. But here that wasn’t 
the case—with having to stay within the 
confines of standard 16KTI BASIC. 

I started by giving the computer a set 
of rules and several variables to test for 
a given situation. First, if a ship has 
been hit only once, the computer will 
take random shots around that hit until 
the direction is determined. It will then 
continue in that direction until either the 
ship has been sunk, or it misses a shot, or 
it runs up to the edge of the grid. It will 
then reverse and shoot at the other end 
if the ship was not sunk. If you put ships 
adjacent to one another, the computer 
sometimes gets “confused” and gets 
caught in an endless loop. Therefore, 
keep your ships separated by at least one 
square in both horizontal and vertical 
directions (its ships can be adjacent) if 
you want to give the Imperial TI Fleet a 
fighting chance. mm* 
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T his matching game is dedicated to house. Often the goal has to realistically 
tired housewives everywhere who become somewhat more attainable-just 
face the daily battle of keeping seeing how much can be accomplished 
their houses clean amidst the unrelent- before the kids come home, 
ing attacks from their kids, husbands, If you get too harried and want to 
dogs, cats, visiting relatives, unexpected quit, press “S” for stop. The arrange- 
friends,and even home computers-those ment of the current array will be dis- 
new family additions that seem to be played. After you have examined it, 
forever spawning dust, out-of-place fur- shift C (BREAK) to end the program. If 
niture, and loose papers. you really feel you must win more often 

Harried Housewife uses the color - that is, winding up with everything 
graphics of TI BASIC to depict eight matched to signify that elusive “clean 
household chores: dusting, sewing, house” - you can keep the kids out of 
washing clothes, doing dishes, cooking, the house longer by increasing the 
vacuuming, shopping, and ironing. It is a number in line 1420. Then enjoy 
matching game that even your young the fantasy of a completely clean house 
children will enjoy playing. The rules all the time. What? Why can’t your 
are simple: An array of 16 squares is home computer make this fantasy actu- 
displayed on the screen. Each square ally come true? Be patient. It’s just a 
represents one of the eight chores, and matter of time . . . Anyway, in the 
there are two of each chore somewhere words of a once-popujar song: “Such 
in the array. The object of the game is are the dreams of the everyday house- 
to find each pair. You do this by choos- wife. . 
ing two squares at a time and entering 
the corresponding two letters. As a 
letter is entered, the chore for that 

square is shown. If a match is made, the Programming Techniques 

chore is considered finished and is listed 

on the right side of the screen. If a This program illustrates the capabili- 
match is not made, the two selections ties of T1-99/4 color graphics. Characters 
are covered, and two more letters may are defined in each of the eight user- 
be chosen. defined character sets, and each set has 

When all eight pairs are matched, the a different color scheme. These eight 
housework is complete; you have a sets are used for the eight chores; and 
clean house and the game is over. But for ease in programming, they are num- 
you mustn’t take too long, because bered 1 through 8. 
when the kids come home (determined Two characters in Set 2 are also re- 
by the counter in line 1420), every- defined with a blue foreground and a 
thing gets scrambled and the harried red background (“FFFFFFFFFFFF- 
housewife must start over ... And as all FFFF” and “0”) to draw the 16-square 
harried housewives undoubtedly know: checkerboard array. It is drawn with a 
It’s not easy to get a completely clean triple-nested FOR-NEXT loop (State¬ 


ments 2040-2150). 

The eight chores to be drawn are 
called in subroutines (Statements 2290 
to 3060). The subroutines use x- and y- 
coordinates to define the placement of 
the special characters. The coordinates 
are specified before the subroutine is 
called. The coordinates for the chore for 
each of the sixteen squares where the 
chore may be drawn are listed in sub¬ 
routines also (Statements 5350-5980). 

To set up the array of 16 squares, 
two arrays are actually used: WORK(16) 
and HH(16). The WORK array is given 
the numbers of the eight chores: WORK 
(1 )=1; WORK(2)=2; . . . WORK(9)=1; 
WORK(10) : =2; etc. (statements 3370- 
3400). For the HH array, a subscript 
RR is chosen as a random number from 
1 to 16. HH(RR) is then set equal to 
WORK(RR), and then WORK(RR)=0 so 
it won’t be chosen again. This process 
continues until all 16 numbers of the 
HH array have been filled randomly 
with the numbers from the WORK array 
(statements 3410-3470). These numbers 
are the chore numbers for the squares. 
For example, HH(4)=7 means behind 
the 4th square(D) would be chore num¬ 
ber 7(shopping). 

The WORK array is then reset equal 
to the HH array so the chores can be 
printed in order on the squares for a 
"clean house” or for “stop”. 

As the game is being played, the HH 
elements are set equal to zero if a match 
is made, so the match can only be scored 
once. If a player chooses a square which 
has previously been part of a matched 
pair, the word "DONE” appears across 
the square. gWH 
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EXPLANAT ION Of THE PROG RAM 
; t - •> Hdrrled Housewife 


line Nos. 

430-160 ' Printstitle screen. 

170-240 - < DefiBOs; colors for eight household chores. 
250-800 "Defines, special characters for drawing the 
I ;« chores. •; l , ! " ; • ■ • 

810 ! Displays the. eight chores bn title screen. 

820-830 ' ' Sets, counters for the number of trial guesses 
: ' . ; and the ft timber of successful matches. 

840 Dimensions arrays ter handle 16 elements. 

8 5 0-860 ’■ ’ Red ©fines ch arac ters for checkerboard. 

870-880 Delays for title screen. 

890-900 1 ' Cleatsscreemand makes it yellow. 

.910 •* ■ s * * * ^l^n^coiarscftjtbiieckarboard. 

920 * * * 1 *'Draws^difebkfrhbard and labels it. 

930 * Assigns the chores for each square in array. 

940-990 Prints “HOUSEWORK”. 

1000-1110 Prints “MATCH 2 LETTERS”. 

1120-1440 «PrinJl t\yo red lines for the letters chosen. 

1150-1180" * Waits *ror letter A-P to be pressed. 

1190 Prints-the chosen letter. 

1200-1210 s Rinds chore number and coordinates for 

•• ■ •;;,;, ’»l ^square; chosen.- * ! ;; 

1220*1240 If the square has been previously matched, 
; prints “DONE”, 

1250 > 1 Draws first chore on square. 

1260-1310 Waits for second letter to be pressed and 
■ - ■ prints it. 

1320-1330 iunds the chore number and coordinates for 
", * , that? aqiiare. 

4340-1374) Prints “DONE”. 

1380 Draws second chore on square. 

1390: : , 5 . ■ Checks for a match. 

1400 ’ increments the number of trials, 

1410 4 ' ; If TIME* 10 prints message to hurry. 

1420 L ;H TIME=512, kids come home. 

1430;; ; ’■ : Branches if TIME is less than 10. 

144(*) - . ■ r Cleam previous message. 

1450-1500 ; Prints “OH NO! KIDS ARE HOME!” 

1540-1530 * Reprints checkerboard and scrambles chores 
'• • - v - •• * '■ 4 fora new gairteV: ", ’ 

1540 ; ; : Prints “PRESS ENTER TO CONTINUE" and 
’ .. *« waits for response, covers squares for next 

- ■ - ;; ■ choice.. - . ■ 

1550-1600 Prints 4 “SP£ED*KIDS WILL BE HOME 

sopN!” 

1640 ! ,Same as 1540. 

1620-1730 Correct niatch is made, sounds tone of A, 
j , ; prints finished chore. 

4740*1750 ’ Sets, elements matched to zero so they can’t 
; - ; ; ' '• Lbe seorpd 'again, • 

1760 * Returns for next choice. 

1770-1820 If all eight matches have been made, prints 

:,: - - ‘“CLEAN HOUSE!-!”' 

1830 ; PHnts S if player Wants to stop. 

1840 ; ; Resets HH array to current arrangement. 

4850-1890 ; Shows all chores in array. 

1900-1960 . Clears all other printing. 

1970-2020 Prints “HOUSEWORK NEVER ENDS”. 

2030 Holds screen until Shift C (BREAK) is pressed. 

Subroutines 

2040-2150; Prints checkerboard. 

2160-2210 Prints letters A to P on squares. 

2220-2280 *■ Prints“S-STOE” and returns. 

2290*2390 ; Draws Teat her duster, 

2400-2420 Draws sewing machine. 

2480-2580 ;■ Drawl T-shirt for w ashing. 

2590-2670" Draws cup andsauper for dishes. 

2680-276011 Draws pah fbt cooking. 

2716-5860 1 * Dri|W$ vacuum cleahei. 

2870-2960* ; Draws shopping basket. 

2970-3060 ; Draws irdhing board. 

3070-3280 ” Placessymbol? oh title screen. 

3290-3760 Plays mhsic for title screen. 

13370-3400 Pills two set? of chore numbers in WORK 
■■■ • ; -; .; : array, ; ’ , . 

3410-3470 Randotnly, arranges chores in HH array, two 
! ' of feadi'chore'.. 


i,: 


820-830 

840 

850-860 
870-880 
890-900 
910 * 

920 < ♦* 
930 

940-990 


1250 


1340 - 

1380 

1390 


1410 

1420 

1430 


3480-3500 

3510 

3520-3560 

3570-3600 

3610-4470 


44804550 

45604570 
4580 4610 
4620 

4630-5260 

5270-5300 

5310-5340 

5350-5980 


15,10-1530 

: ■ * V- "■ ' ‘ ‘ 

IS40 : : 


16W 


1760 

1770 - 

1830 


100 

no 

120 

130 

140 

150 

160 

170 

ISO 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

6Q0 

690 

700 

710 

720 

730 

740 

750 

760 

770 


Resets WORK array equal to HH array. 
Restarts number of matches. 

Clears printed list of matches made. 

Resets HH array to original WORK array for 
printing. 

When a match is made, blinks the picture and 
prints the chore in the “Finished” list; prints 
labels under pictures in the squares. ! 

Prints “PRESS ENTER TO CONTINUE” and: 
waits for response. 

Clears messagdS; 

Covers squares again and relabels them, 

Return for next choice. 

Subroutines for covering particular square. 
Colors blue square. 

Colors red square. > 

Designates the chore number and coordinates 
for the square chosen. 

REM HARRIED HOUSEWIFE 
REM 99“ER VERSION 7.B1.1 
REM BY REGENA 
CALL CLEAR 

PRINT TAB(10)i"HARRIED" 

PRINT ::TAB<9);"HOUSEWIFE" 

PRINT ::::::::::TAB <9>;"BY REGENA" 

CALL COLOR(9,7,15) 

CALL COLOR UO, 13. 12) y* - 

CALL COLOR (11,14,11) /r\ ’7\ 

CALL COLOR (12, 16,3) f / A 

CALL COLOR (13,7, 12) \j } 

CALL COLOR (14,5,8) —V/ 

CALL COLOR <15, 15, 16) V -^ 

CALL COLOR(16,3,16) 

CALL CHAR(96,"0000040EBEBEFFFF") 

CALL CHAR (97, "000000002050^^ ) 

CALL CHAR (98, "0201010703010101’*) 

CALL CHAR(99,"FFFFFFFFFFFFFFFF") 

CALL CHARdOO, '*FOEOCOFOF1E080C" ) 

CALL CHAR <101,"03070E1C3S70E0C”) 

CALL CHAR(102,"FFOEO?") 

CALL CHAR (103 , " 0 “*) 

CALL CHAR(104,"FFFFFFFFFFFFFFFF") 

CALL CHAR(105,"FCFCFCFFFFFFFFFF") 

CALL CHAR <106,"FCFCF8F8F0E0C") 

CALL CHAR(107,"FFFFFFFFFCFCFCFC") 

CALL CHAR(108,"FFFFFFFFFF") 

CALL CHAR <109,"O") 

CALL CHAR <112,"OOOOOOOOOFOFOFOF") 

CALL CHAR <113,"0000000081C3FFFF") 

CALL CHAR <114,"OOOOOOOOFOFOFOFO") 

CALL CHAR <115,“OFOF"> 

CALL CHAR(116,"FFFFFFFFFFFFFFFF") 

CALL CHARU 17, "FOF") 

CALL CHAR(118,“FFFFFFFF") 

CALL CHAR(119,"O") 

CALL CHAR(120,“OOOOOOOOOOOCOFOF") 

CALL CHAR(121,"OOOOOOOOOOOOFFFF") 

CALL CHAR(122,"OOOOOOOOOOCOCOFC") 

CALL CHAR(123,"OFOFOFOFOFOFOFOF07") 

CALL CHAR(124,"FFFFFFFFFFFFFFFF") 

CALL CHAR(125,”FEC6C6C6DCFSE08“) 

CALL QHAR <126,“FFFF“) 

CALL CHAR(128,“1F1F1F1F1F1F1F1F") 

CALL CHfiR(129,"FFFFFCFCFCFCFCFC"> 

CALL CHAR(130,"FFFF") 

CALL CHAR(131,"1F1FOF") 

CALL CHAR(132,“FCFCF8") 

CALL CHAR(133,"O") 

CALL CHAR(136,”1FOFO10000000303") 

CALL CHAR(137,“80C0C0C0C0F0F8F8") 

CALL CHAR(138,"0303030303030101") 

CALL CHAR(139,“F8FOFOFOFOFOEOE") 

CALL CHAR(140,"EOC7CF7FFFFFFF") 

CALL CHAR <141,"OOSOCOCOFOFOE") 

CALL CHAR(142,"0") 

CALL CHAR(144,"0000000004001A19") 

CALL CHAR(145,"090F09090F09090F") 

CALL CHAR(146,"FE252424FF2424FF") 

CALL CHAR(147,"0OE09E92FE9292FE“) 

CALL CHAR(148,"06090906”) 

CALL CHAR(149,"O") 

CALL CHAR(152 , "OOOOOOOOIF1FIFIF") 

CALL CHAR(153,"OOOOOOOOFOFFFFFF") 

CALL CHAR(154,"OOOOOOOOOOFOFEFE“) 

CALL CHAR <155,"1F1F1F04O201") 

CALL CHAR(156."FFFFE2040810AO4") 


CALL CHAR(125, 
CALL QHAR<126, 


Continued on p. 38 


28 99'er Magazine July/August 1981 














Sprite Chase 

By Ron Binkowski 

W ait . . . Wait . . . Wait . . . 
When will they get here? 
Wait . . . Wait . . . Wait . . . 
“Hi dear, anything in the mail today? 
Did you look between the doors? Oh. 
Shucks." 

“Hello Ginny. What? You accepted a 
package from UPS for me? Great! Could 
you get it for me? Thanks." 

“See you later dear, I’ll be down¬ 
stairs." 

They’re here . .. 

The SPRITES are here . . . 

NOW, WHAT CAN I DO WITH THEM? 

Skim through the manual, page 25. 
Uh huh. OK. Yea. This looks great! 
Let’s get a little deeper. Page 64. Oh oh. 
COINC looks like the ALL option 
doesn’t tell you which SPRITES “coin- 
cidcnccd." I hope someone can find out 
where to PEEK for this. 



Now, what shall I do with them? 
Something simple. Design some cute 
characters? No, let’s just get those 
SPRITES moving. Since COINC ALL 
might take some time to figure out 
which SPRITES are coincidental, I’ll 
stick to one SPRITE versus another. 
How about a series to chase? Numbers 
. . . Letters . . . ROTATION . .. That’s 
it. . . 

A short game chasing the 10 numbers 
or a longer game chasing the 26 letters. 
I’ll try the MAGNIFY too. I’ll need a 



numeric variable for the COINC toler¬ 
ance for that. 1 guess 8 for normal size 
and 16 for double size. I’ll generate the 
number or letter SPRITES to go any 
which way at some speed between —25 
and 25. I’ll stick to the 8 directions 
around the arrows for the chaser or else 
I’ll get so tangled up in the math that 
I’ll never move a SPRITE. Wish I had 
Joysticks. I guess some kind of clock 
would be good for scoring. 

Well, here we go: 



EXPLANATION OF THE PROGRAM 



Sprite Chase 

Line Nos. 

170-200 

Instructions. 

210-280 

Set up variations for play. 

290-300 

Reset for start of game. 

310 

Make clock numbers reverse image. 

320-330 

Put the Chaser somewhere in middle of the 
screen. 

340-3 60 

Create the Chasees. 

370-390 

The chase has begun. 

400-450 

While waiting for a direction key to be pressed, 


keep the clock going and check for a coinci¬ 
dence when the Chaser is stationary. 

460-530 

Start the Chaser in the direction of key 
pressed. 

540-590 

While awaiting release of direction key, check 
for a coincidence when the Chaser is moving; 


keep clock going. 

600-610 

Stop the Chaser; wait for another key to be 
pressed. 

620-650 

Caught one; go for the next one. 

660-710 

End of game. 

720 

That’s it. 


A FEW K>ST SCRIPT NOTES: 

If a SPRITE is moving slowly in a vertical direction, it 
might go off the top or bottom of the screen for a while, 
but can be caught there. 

If you insert COINC statements between a lot of the in¬ 
structions and check the HIT field, you probably would 
reduce the times a coincidence is missed. , 

' If you leave the Chaser in its original position, all targets 
will eventually pass through it. I wonder how long this 
would take? 

If it sounded like I was talking to myself, I was! Doesn’t 
everyone??? 


IOC REM **************** 

110 REM * SPRITE CHASE * 

120 REM **************** 

130 REM 99'ER VERSION 7.B1.1XB 
140 REM BY RON BINKOWSKI 
150 REM 
160 REM 

170 CALL CLEAR 

130 PRINT "USE THE FOUR ARROW KEYS AND W-, R,Z,C KEYS 
TO CHASE THE LETTERS OR NUMBERS." s: FRINT 
190 PRINT "YOU MUST CATCH THEM IN ALPHAOR NUMERIC 
SEQUENCE." :; PRINT 

200 PRINT "PRESS 'L’ FOR LARGE TARGET. 'S’ FOR 
SMALL TARGET." ;: PRINT 


210 

220 

230 

240 

250 
260 
27 0 

280 

290 

300 

310 

320 

■-"i o O 

340 

350 

360 

370 

3-30 

390 

400 

410 

420 

470 

440 

450 

460 

470 

480 

4^0 

5o0 

51 0 
520 
7 3 0 
540 


Cr f. 


' 1 ' 6 0 
t >7 0 

5 BO 
390 
6 1 j f j 
61 O 
670 
630 
640 
650 

6 Li 

■6 7 0 

6 SO 

7 OO 
3 1 O 
72 i 


CALL KEY(O,GOT,STATUS) 

IF STATUS=0 THEN 210 

IF GOT=76 THEN T=16 :: CALL MAGNIFY(2)ELSE 
IF GQT=83 THEN T=S ELSE 210 

PRINT "FOR NUMBERS PRESS 'N’^’j-FOR LETTERS 
PRESS ’L’." :: PRINT 
CALL KEY(O,GOT,STATUS) 

IF STATUS=*0 THEN 250 

IF GOT=7S THEN TARGS=IO :! CH=47 ELSE IF GOT=76 
THEN TARGS=26 :: CW=64 ELSE 250 
CALL CLEAR 
RANDOMIZE 
C0UNT=0 

CALL COLOR <3,2,9) : : CALL COLOR (4-, 2, 9) 

CALL CHAR(96,"FFFFFFFFFFFFFFFF") 

CALL SPRITE(#28,96,2,90,120,0,0) 

FOR A=1 TO TARGS 

CALL SPRI TE (#A, A+CH, 2,90, 120, I NT (RND *50—25) , 

I NT(RNDI50—25)) 

NEXT A 

CALL SOUND(1OO,555,0) 

FOR A=1 TO TARGS 
CALL COLOR(#A„16) 

CALL KEY(O,GOT,STATUS) 

0DUNT=C0UNT+1 

DISPLAY AT(24,1)SIZE(6):COUNT 
CALL COINC(#28,#A,T,HIT) 

IF HIT = — 1 THEN 620 
IF 5TATUS=0 THEN 400 

IF G0T=69 THEN CALL MOTION(#28,—30,0) 

IF GOT=88 THEN CALL MOTION(#28,30,O): 

IF GOT=68 THEN CALL MOTION(#28,0,30)s 
IF GGT=83 THEN CALL MOTION(#28,O,-30) 

IF G0T=37 THEN CALL MOTION(#28,-30,-30>: 

: GOTO 540 

IF G0T=82 THEN CALL MOTION(#28,-30.30) : : GOTO 540 
IF GOT=90 THEN CALL MOTION<#28,30,-30)s: GOTO 540 
IF GOT=67 THEN CALL MOTION(#28, 30,30): : GOTO 540 
CALL KEY!0,SOT,STATUS) 

CALL COINC(#28,#A,9,HIT) 

IF HIT=—1 THEN 620 
C DUN T=COUNT+1 

DISPLAY AT(24,I)SIZE(6);COUNT 
IF STATU5=-1 THEN 540 
CALL MOTIONf#2B,O,O) 

SOTO 400 

CALL DELSPRITE(#A) 

CALL SOUND(10O,-7,O) 

CALL MOTION(#28.O,O) 

NEXT A 

CALL CHARSET 

PR1NT "YOUR SCORE IS COUNT 
PRINT "ENTER 'Y' TO PLAY AGAIN; “ 

CALL hEY(O,GOT,STATUS) 

IF STATUS=C THEN 690 
IF GOT=89 THEN 280 
FRINT " BYE” 


GOTO 540 
GOTO 540 
GOTO 540 
GOTO 540 
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TMS9900 

Machine & Assembly Language 


Part 2 : Registers, Programming, & The Need For Assemblers 


By Dennis Thurlow 


W e left off last time explaining registers—devices 
which act like Random Access Memory (RAM) in 
that they can be used to store and later recall 
values, but are different from RAM in that they are not ad¬ 
dressed by the bus. Registers are on the CPU chip itself, and 
only the CPU can address them. 

We discussed the Program Counter (PC) as being 16 bits 
long, allowing it to address 65536 bytes of memory, and 
noticed that the ones bit is not represented on the address 
bus. This was so that the PC could increment two bytes and 
hook them together making a single 16-bit word, or 
“gobbyl,” while the address bus would appear to increment 
only once. Other than this, the TMS9900 PC doesn’t differ 
from those of other CPU's; it still tells the computer where 
to get its next byte or word from. 

Status Register 

Almost every CPU has some kind of flag(s). These are set 
(high) and reset (low) by actions performed in the manipula¬ 
tions of data. Different instructions affect different flags. 
Modern CPUs combine several flags into a single Status Re¬ 
gister. The TMS9900 is no exception. Its Status Register 
(ST) is 16 bits long. Bits 7-11 are not used at present. The 
others are shown in the drawing below, and are explained in 
the text. 
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INTERRUPT 

MASK 


Each of these conditions will be discussed in more detail as 
examples are shown. Until then, these simple descriptions 
will help. 

The four bits labeled 12-15 can select up to 16 interupt 
levels. All levels equal to or above the level indicated are 
enabled. 

Bit 0 is set after any operation where the destination 
value (answer) is greater than the source value (the first 
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operand used and which remains unchanged). All 16 bits 
are used for the comparison. I 

Bit 1 is similar to bit 0 except that the values are com 
pared as signed integers. The MSB (most significant bit 
designates the sign of the integer, with a 1 meaning negativi 
and a 0 meaning positive. The range is +32,767 to —32,768 
Negative numbers are represented in a twos complemen 
fashion. 

Computer math is cyclic. This means that if you add : 
to the highest possible 16-bit number (FFFF hex), you g< 
back to 0000 hex with a carry bit that is set. If yoi 
subtract 1 from 0000 hex without the carry, you get af 
overflow ; but if the carry is set, you get FFFF hex. There 
fore, —1 is FFFF hex in twos complement. To see its useful 
ness, let’s add —1 and 1: FFFF hex plus 0001 hex equa 
0000, the carry is set, and the answer is zero. In a nutshell 
this whole business of twos complements and carry bits i; 
simply a way to subtract by adding. 

Bit 2 is set if the two operators are equal. 

Bit 3 is set if a 1 is shifted out of an operator, or if i 
carry occurs in a math operation. 

Bit 4 is set if the math requested cannot be done. 

Bit 5 is set if the parity is odd, and reset if it is event 
Odd parity means that there is an odd number of Is in tin 
binary representation of an operator. 

Bit 6 is set after an extended operation has been cod 
pleted. This is done because an interrupt is not checked fqj 
after completion of an extended operation. (You therefor* 
may wish to have the software check for one if this flag i 
set.) 

The ALU 


Most CPUs have an Arithmetic/Logic Unit (ALU) wher 
the simple math is performed. An accumulator, a specij 
register used by the ALU, usually contains the answers t< 
the math. In the TMS9900 there is no accumulator becaus 
the destination address is almost always the equivalent. Thi 
means, in effect, that any memory location can be the ac 
cumulator. There is an ALU on the TMS9900 chip, but it 
operation is intrinsic to the instructions. 


?! 

75 


Other Registers 

Most CPUs have a few extra registers where quick! 
needed values can be stored, as well as a register called 
Stack Pointer which points to a section of memory whe 












more data can be “piled” and then quickly accessed. These 
two concepts have been combined on the TMS9900 into a 
single Workspace Pointer Register (WP), The WP points to a 
block of 32 bytes of memory arranged as 16 workspaces 
(WS), each 16 bits long. The workspaces are synonomous 
with registers, and arc used the same way. We can change the 
WP in several ways, and can save the old WP when a new 
one is used. This allows us to return to the old one if we 
need to. This set-up, in effect, acts like an elaborate stack. 

There are five different ways to use these WS registers to 
indicate an operator for an instruction. These addressing 
modes are as follows. 


1. Workspace Register Mode 
code 00 

2. Workspace Register Indirect 
code 01 

3. WS Register Indirect 
w/Auto-Incrcment 
code 11 

4. Symbolic or Direct 
code 10 
destination 0 

5.Indexed 
code 10 

destination 1-15 


—the data in the indicated 
register is the data used, 
—the data in the register is 
treated as the address of 
the real data. 

—same as above, but the 
register is incremented 
upon completion. 

—the address of the data 
follows the instruction 
in memory. 

—address is found by add¬ 
ing the symbol amount 
to an indirect register 
address. 


There are three other addressing modes not dealing with 
registers, per se: (1) The immediate mode has the data im¬ 
mediately following the instruction code. In other words, 
the address of the data is the address immediatly following 
the PC. (2) The CRU mode has the address of an external 
input/output (I/O) device determined by bytes 3-1 2 of regis¬ 
ter 12. (3) The JMP instruction (and all variations thereof) 
use the last 8 bits of the instruction to determine where on 
a 256 byte page to jump. The PC indicates the center of the 
page, so the jump can be from PC-128 to PC+1 27. One byte 
is taken up by the jump instruction itself. The 8 bits store 
the relative jump in twos complement form. 

Programming and the Need for Assemblers 

If your CPU is the TMS9900, the simplest computer you 
could construct would be composed of a clock, a CPU, 


some memory, a few control switches, 16 data switches, 16 
lights for read out, and 15 address switches. It would be 
crude and slow to program, but once programmed, it would 
operate as well as any other computer. But how could we 
program it? 

Suppose we wanted to load register 1 with zero, and 
then increment it until it was equal to either 1024 (decimal) 
or register 2. The first step can be done several ways. Imme¬ 
diately loading register 1 with 0 comes to mind first. A 
little investigation of the instructions for the chip show that 

we could save a word of memory by using the Clear com¬ 
mand. Figure 1 show^the register format for the various 
commands, and Figure 2 shows the op codes for the in¬ 
structions. 
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3 
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OPCODE 


OP CODE 




OPCODE 


RELATIVE JUMP 


D 


OPCODE 


OP CODE 


OPCODE 


OPCODE 


W 


N 


3 


W 


IMMEDIATE VALUE 


OP CODE 


D 


mnMw 


KEY 


Td/T s FIELD CODES 


B l^byte 0=word 

destination address mode 
D destination address 
T s source address mode 
S source address 
C counter 
W register number 
N unused 

RE LATIVE JUMP from +127 to -128 


00 Register 
01 Indirect 
10 with R0, symbolic 

10 with R1-R15, indexed 

11 Indirect with increment 


Figure 


Using this information, wc can now determine the bina¬ 
ry values of each word. Load immediate uses the first 10 
bits as the op code; the 11 th bit is not used, and bits 12-15 
select the register. This means the first byte is 

00000010000X0001 , where X can be 1 or 0. 

The second byte is the value to load, and in this case would 
be all zeros. 


★ ★ TI-99/4 SOFTWARE ★★ 

TEXT EDITOR $09 

TEXT/99 - Allows entry, editing, 
disk or cassette storage and print¬ 
ing of your written text. Upper & 
lower case. Word oriented for 
fullest editing freedom: change, 
insert, delete or move Chains files 
for long documents, (Manual 
$ 10 .) 

PERSPECTIVE PLOTTING $199 

DRAW/99 - For architects, en¬ 
gineers, artists. True perspective 
or axonometric line drawings of 
any object you enter. Drives 
Mauro Eng. MP-250 plotter (11-in 
paper, about $800), (Manual $20.) 

NAVAL ARCHITECTURE 

99/4 programs for hull design, 
hydrostatics, performance and 
most marine design calculations. 
Inquire. 

LETCHER OFFSHORE DESIGN 

P.O. Box 104, Southwest Harbor, Maine04679 
Tel. 207-244-7347 
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PRESENTS 


RINGWRAITH’S LAIR 


A fantasy game of 
high adventure! 

$24.95 


For catalog write 



THE MICRO HOUSE 

Complete TI-99/4 Line 


Discount Prices 


99/4A Console 

$400 

Disk Drive 

400 

Disk Drive Controller 

235 

RS232 Interface 

175 

Epson MX-80 printer 

630 

(with serial board & Cable) 


Add $5 for Shipping & Handling 


I For complete price list write: 

THE MICRO HOUSE 
527 Simonet Street 
Green Bay, WI 54301 

Tel. (414) 432-2871 
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Now, just flip each switch on jf there is a 1 at the corre¬ 
sponding bit, off if there is a zero. Press the Input control 
switch (it also might be called Dump, or Load, or ... ) and 
the instruction is stored in whatever address the address 
switches are set to. Then add 1 to the address switches 
(which adds 2 to the PC) and set ail the data switches to 
zero. Press Input again and our complete instruction is 
ready. 

If instead, we use the Clear command, we would use the 
single-operand general format with the first 10 bits being 
the op code. The next two bits indicate address mode, and 
the last 4 bits select the register. Since we want to clear the 


register itself (not the word it points to), the code is 00, 
and the whole instruction is 0000010011000001, 

Even with a hex keypad and a small monitor program, it 
would be a very time-consuming process to piece together 
the binary words, and then convert to hex and type them in. 
Typing in 04C1 is easier than setting swiches to 

0000010011000001 , 

but putting together those op codes is just the tedious, bor¬ 
ing kind of work that computers are supposed to free us 
of. So why not use them for that? 

Why not, indeed . . . That’s exactly what we'll do next 
issue when we look at a TMS9900 assembler. 


Figure 2, 


Mnemonic 

A 

AB 

ABS 

At 

AND I 
B 

BE . > - 

BtWP 

c ■ 

GB ^ 

Cl *+ 

CKQF 

CKON 

CLR 

coc 


DEC 

DECT 

DIV 

IDLE 

INC 

INCT 

INV 

JEQ 

JGT 

JH 

JHE 

JL 

JLE 

JLT 

JMP 

JNC 

JNE 

JNO 

JOC 

JOP 

LDCR 

LI 

LIMI 

LREX 

LWPI 

MOV 

MOVB 

MPY 

NEG 

ORI 

RSET 

RTWP 

S 

SB 

SBO 

SBZ 

SETO 

SLA 

SOC 

SOCB 

SRA 

SRC 

SRL 

STCR 

STST 

STWP 

SWPB 


SZCB 

TB 

X 

XOP 

XOR 


Op Code 

1010 

1011 

0000011101 

00000010001 

00000010010 

Q000010001 

0000011010 

0000010000 

1000 

1001 

00000010100 

0000001111000000 

0000001110100000 

0000010011 

001000 

001001 

0000011000 

0000011001 

001111 

0000001101000000 
0000010110 
0000010111 
0000010101 
00010011 
00010101 
00011011 
00010100 
00011010 
00010010 
00010001 
00010000 
00010111 
00010110 
00011001 
00011000 
00011100 
001100 
00000010000 
00000011000 
0000001111100000 
00000010111 
1100 
1101 
001110 
0000010100 
00000010011 
0000001101100000 
0000001110000000 
0110 
0111 

00011101 

00011110 

0000011100 

00001010 

1110 

1111 

00001000 

00001011 

00001001 

001101 

00000010110 

00000010101 

0000011011 

0100 

0101 

00011111 

0000010010 

001011 

001010 


Format 


Status 

0-4 
0*—B 
0-4 
0-4 
0-2 


Bits Affected 


0-2 

0-2,5 

.—2 


2 

2 

0-4 

0-4 

4 

0-4 

0-4 

0-2 


0-2,5 

0-2 

12-15 

12-15 

0-2 

0-2,5 

0-4 
0-2 
12-15 
0-6,12-15 
0-4 
0-5 

mm mm m-m 

mm mm ■#» 

0-4 

0-2 

0-2.5 

0-3 

0-3 

0—3 

0-2,5 


(ST2=1) 

(ST1=1> 

(STOand ST2=1} 
(STOor ST2*1) 
(ST0 and ST2=0} 
(ST0=0 or ST2=1 
(ST1 and ST2=G) 
(none checked) 
<ST3=0) 

(ST2=0) 

(ST4=0) 

(ST3“1) 

(STB**!} 


Words (OR) 
Bytes (OR) 


0-2 

0-2,5 

2 

6 

0-2 


Words (AND) 
Byte (AND) 


Meaning 

Add words 
Add bytes 
Absolute Value 
Add immediate 
And immediate 
Branch 

Brandi and Link (Rll) 

Branch, toad WP 
Compare words 
Compare byte 
Compare immediate 
External Control 
External Control 
Clear 

Compare Ones Corresp. (OR) 
Compare Zero Corresp. (AND) 
Decrement by one 
Decrement by two. 

Divide 

■■v:v ■ 

Computer idles 
Increment by one 
Increment by two 
Invert (complement) 

Jump if equal 
Jump greater than 
Jump high 
Jump high or equal 
Jump low 
Jump low or equal 
Jump less then 
Jump unconditionally 
Jump no carry 
Jump not equal 
Jump no overflow 
Jump on carry 
Jump odd parity , 

Load CRU 
Load immediate 
Load immed. INT mask 
External control 
Load immed. WP 
Move word 
Move byte 
Multiply 

Negate (2's comp.) 

OR immediate 
External control 
Return with WP 
Subtract word 
Subtract byte 
Set CRU bit to one 
Set CRU bit to zero 
Set ones 
Shift left (0 fill) 

Set ones corresp. 

Set ones corresp. 

Shift right (MSB fill) 

Shift right circular 
Shift right zero fill 
Store from CRU 
Store ST 
Store WP 
Swap bytes 
Set zero corresp. 

Set zero corresp. 

Test CRU bit 
Execute 

Extended operation 
Exclusive OR * * 
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T ucked away in my basement, I 
have both a Radio Shack TRS-80 
and a Texas Instruments T1-99/4. 
The half dozen personal computer mag¬ 
azines I read each month provide coding 
and ideas for many new programs for 
my TRS-80.1 now have a large collection 
of these programs and have grown to 
really appreciate the help and enjoyment 
this software “library'’ provides. Unfor¬ 
tunately, it just hasn’t been that easy to 
acquire software for the Tl machine. 
[But now, with the birth of 99'er Maga¬ 
zine this situation will be rapidly reme¬ 
died—Ed.] The solution for me was ob¬ 
vious. I’d convert my TRS-80 programs 
to Tl BASIC. 

At the suggestion of 99’er Magazine's 
editor, I read an article by Harley M. 
Templeton appearing in the November 
1980 issue of Personal Computing maga¬ 
zine. Although the article highlighted 
the major differences between the ver¬ 
sions of BASIC used on the two systems, 
it didn’t point out which differences 
matter y and which are merely interesting 
but of little practical importance. As 
you might expect, the only way to find 
out is to actually convert a program and 
learn from the problems that are en¬ 
countered. 

To set up a fair test, I selected TRS-80 
programs from opposite ends of the 
spectrum: The first was a “number 
cruncher” which I had written to con¬ 
vert the number correct on a test to a 
scaled value on a continuum of learning. 
(My nine-to-five job involves the manage¬ 
ment of the standardized testing pro¬ 
grams for the Portland School District.) 
The other program was an adaptation of 
the ideas behind a slot machine game in 

David Ahl’s Basic Computer Games—a. 
program with extensive use of graphics. 

The first trouble I encountered was 
in converting the PRINT AT command 
available on the TRS-80. The procedure 


suggested by Templeton was to set a 
loop as follows: 

100 A$=“SOMETHING TO BE 

PRINTED STARTING AT 10,12” 
200 FOR 1=1 TO LEN(A$) 

300 N1=ASC(SEG$(A$,I,1)) 

400 CALL HCHAR(10,12,N1) 

500 NEXT I 

In theory this works fine, but it is 
slow if the string length is long; single 
characters don’t walk across the screen— 
they craw!! Since the program requires a 
prompt printed in the middle of the 
screen to cue the operator to enter the 
next five values for the scaling proce¬ 
dure, my final solution was to use the 
following coding: 

100 PRINT “MESSAGE AT THE 
MIDDLE OF THE SCREEN” 

200 PRINT ::::::::: 

This procedure causes the text prompt 
to scroll up from the bottom to the 
middle of the screen. It is not especially 
speedy, but it is fast enough for data en¬ 
try in cases where you don’t need lines 
at the top of the screen that disappear 
as a result of this scrolling action. 

The ease with which the “number 
crunching” code converted was a pleas¬ 
ant surprise. It was important to keep 
track of the differences in the line num¬ 
bers for GOTO’s and other branches, 
but that, in fact, presented little prob¬ 
lem. What was more difficult was con¬ 
verting the logic of IF .. . THEN . . . 
ELSE clauses. TRS-80 (Microsoft) 
BASIC allows multiple statements per 
line—coding that is messy to convert, 
but not too difficult. It does, however, 
also allow multiple statements following 
the THEN and ELSE-coding that is dif¬ 
ficult to keep straight and re-code. The 
multiple line conditionals can be con¬ 
verted, but the conversion requires a 


clear head and a basic understanding of 
how the program works. 

Since I had written the TRS-80 pro¬ 
gram myself (it had more lines of docu¬ 
mentation than coding) and naturally 
understood its operation, the conversion 
was fairly straightforward. After chang¬ 
ing nearly all the PRINT and PRINT AT 
statements, the program worked the first 
time (surprise). To check it out, I made 
a comparison run on the T1-99/4 and 
the TRS-80. Surprisingly, they ran the 
same job in almost the same time (three 
minutes for a fourty item test). Finally, 

I spruced up the program a little with 
CLEAR and CALL SCREEN commands 
to take advantage of the color options 
available on the Tl machine. 

The second program was a challenge. 
It had essentially four main parts: (1) 
an introductory message, (2) the set-up 
graphics of the “slot machine,” (3) the 
rotation of the wheels in the slot ma¬ 
chine, and (4) the determination of the 
winnings and losses. The first and easiest 
part of the program to set up was the 
section which printed the introductory 
messages. I couldn’t resist adding the 
CALL SCREEN command and sprucing 
up the comments to make it more attrac¬ 
tive (at least to me). In this instance, the 
lack of speed for the HCHAR command 
was a benefit since it painted the screen 
at a leisurely-yet-pleasing pace. Before I 
was through, I had changed all the code 
in this section for aesthetic reasons. 

My real conversion problems began 
in the second section. There, I came 
face-to-face with the significant differ¬ 
ences in the way graphics are handled 
by the two systems. In moving from a 
screen of 16x64 to one of 24x28,1 had 
to stop and develop a new outline shape 
for the slot machine—one that would fit 
the Tl screen. Deciding the colors to be 
used in defining the outline of the ma¬ 
chine and the shapes to be matched 
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Ledger^ 


Payroll 


• Developed and used to simplify 
financial records in the author's 
household and solo incorporated 
medical practice. 

•Convenient, reliable disk-based 
package accepts 50 entries per 
month in 78 accounts and cate¬ 
gories, maintains year-to-date 
totals, and has features to find, 
revise, display and print entries 
and a chart of accounts. 

• A payroll program calculates 
monthly/semi-monthly payroll 
and prints quarterly records. 

16KTI BASIC 

Price: $55 Postpaid. 

(Disk + Fuii instructions) 

Illinois residents add 6% sales tax. 

E. D Schwarz, M. D. 

735 St. Johns Ave. Suite 400 
Highland Park, IL 60035 



Texas Instruments 
TI-99/4A 


Console only 

$399 

Modulator 

41 

Disk Controller 

243 

Disk Drive 

399 

RS232C 

183 

Telephone Coupler 

183 

Thermal Printer 

325 

Speech Synthesizer 

122 

32K RAM Memory 

325 

Extended BASIC Module 

81 

Remote Controllers 

28 

Casette Cable 

14 

TI-59 Calculator 

199 

TI-58C Calculator 

89 


We stock alt Tl-99/4 Software 

Prices FOB Lexington, KY 
Add $4 for shipping 
Credit Card Orders add 4% 
KY Residents add 5% tax 


GBIVIiimc. 

198 Moore Dr. 
Lexington, KY 40503 
1-800-354-9099 


(cherry, bar, bell, orange, lemon) took 
extra time. After some experimentation, 
dark blue against a white background, 
the lemon became a lime (dark green). 
To develop a new set of four characters 
for the orange, I experimented with 
CALL CHAR until the figure finally 
looked like a circle instead of one of 
Dali’s exploded watches. Since there 
isn’t an orange color available, the orange 
became a plum (magenta). I was still a 
character short, so I used the heart from 
the back of the user’s manual. 

En route to coding this part of the 
program, I had to define the shapes— 
assigning them to one of the sixteen 
character sets. I, however, twice made 
the mistake of trying to conserve memo¬ 
ry by using one of the character sets 
with pre-defined codes. This caused er¬ 
rors in the print statements using these 
codes. The moral of that experience: 
Whenever possible, stay away from the 
first eight character sets when defining 
new characters. It took a while to work 
the kinks out of this section, but the ad¬ 
dition of color made a tremendous dif¬ 
ference, and I became hooked on Tl 
graphics. (I’ll probably never run the 
TRS-80 version of this program again.) 

At this point, I realized that virtual¬ 
ly every line of the original program had 
been rewritten in the move to the Tl 
machine. Since this was to be an article 
on program conversion, not program¬ 
ming, I called the editor at 99'er Maga¬ 
zine to make sure I hadn’t missed the 
point of the article. Gary, however, 
wasn’t surprised at all, and encouraged 
me to include suggestions on rewriting 
as well as conversion. 

The third section of this program was 
probably the toughest to convert. I have 
been responsible for programming and 
systems analysis for over ten years on a 
variety of large computer systems. This 
has required establishing “structured” 
programming standards for every pro¬ 
gram with which I work. Even though 
I had personally keyed in the slot ma¬ 
chine program, I had forgotten how 
poorly it was documented. This is not a 
criticism of Ahl’s book, but rather, a 
realistic comment on what you are 
likely to encounter when converting a 
program. After an hour of tracing 
through a maze of GOSUBS without the 
benefit of a single comment, 1 decided 
on a total rewrite. 

The TRS-80 version had the program 
determine the coordinates of one of the 
nine open spots on the slot machine, 
and then perform a PRINT AT at that 
location. Using FOR . . . NEXT loops, it 
was possible to overprint the nine spots 
to give the illusion of a rotating machine 
wheel. By converting the PRINT AT 
commands to HCHAR calls and storing 
the four codes for each shape in an 
array, it was possible to simulate this 
action on the Tl-99/4. The graphics 
were fantastic (an unbiased estimate), 
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99*er Magazine is looking foil 
articles in all areas of persona§j 
computing that concern the 
Texas Instruments Tl-99/4 and 
other TMS9900-family systems; 
(e.g,, Marinchips, Technico, and| 
the TM990/189). Here are the 
kinds of articles that we want! 
you to write for us: 

• Are you a businessman, pro 
fessional, hobbyist, scientist, 
or engineer with an interest¬ 
ing microcomputer applica¬ 
tion? Teli us how it works-,;] 
what problems you’ve had tof 
overcome, and what reconv 
mendations you have for 
others. We’re especially inter 
ested in sharing user-written! 
software with our readers. 

• Have you recently purchased 
a piece of hardware or soft¬ 
ware that hasn’t quite come 

- up to your expectations, or| 
has, on the other hand, im¬ 
pressed you with its perform! 
ance? We’re looking for 
comprehensive product and 
book reviews from different 
perspectives. 

• Are you an educator or par¬ 
ent with something to cons 
tribute to computer-assisted 
instruction (CAI)? We’re al-| 
ways looking for new ideas 
and fresh approaches to edu¬ 
cational problems. 

• Have you created any unusual 
computer games or Simula-} 
tions? Let our readers ex¬ 
perience your excitement 1 
and pleasure. 

• Perhaps you Ve modified your] 
microcomputer or have inter-1 
faced it with some unique or 
useful hardware. Send us 
your how-to-do-it story. 

These are just some ideas. 
Perhaps you have others, Don’t] 
worry if you’re not a profes¬ 
sional writer. Our editorial staff 
stands ready to help polish upj 
your manuscripts. And we’ll be 
more than happy to send you a 
copy of our author’s guidelines! 

Send your manuscripts^ancH 
correspondence to: 

99’er Magazine / Editorial Dept. J 
2715 Terrace View Drive, 
Eugene, Oregon 97405 
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SUMMARY OF COMMANDS 


TRS-80 Commands 
Not Requiring Conversion 


TRS-80 Commands 
That Can Be Ignored 


<■ i' i. * 


V - < b 


■> 




ABS 

GOSUB 

REM 

CLEAR 

CSNG DEFSNG 

asc 

INPUT 

RESTORE 

CDBL 

DEFDBL DEFSTR 

ATN 

INT 

RETURN 

CINT 

DEFINT FRE 

CHR$ 

LEN 

SGN 


. y ‘‘i "• 

COS 

LET 

SIN 


V . j 

■ ‘ .. - ■ v x - - ■ 

■ ■ . . ■< " " : 

DATA 

LOG 

SQR 

Commands Difficult to Convert to Tl BASIC 

DIM 

ON/GOSUB 

STR$ 



End 

ON/GOTO 

TAN 

TRS-80 

Tl BASIC 

EXP 

PRINT 

VAL 

IF ..THEN . . ELSE 

IF. .THEN.. ELSE* 

GOTO 

READ 


■ i- 

< ■■ 

i ■ 

refer to line numbers * f * 

\ J?' v ‘: 



POINT 

CALL CHAR CALL GCHAR 


TRS-80 Commands 

POKE (graphics) 

CALL CHAR CALI. HCHAR 


Easily Converted 

PRINT AT 

FOR , . ASC .. CALL HCHAR 


TRS-80 

CLS 

FIX 

INKEY$ 

INPUT#—1 

LEFT$(A$,N) 

MID$(A$,N1,N2) 

RANDOM 

RIGHT$(A$,N) 

RND(N) 

STOP 

TAB 

? 


Tl BASIC 

CALL CLEAR 
INT 

CALL KEY 

INPUT#1 

SEG$(A$,1,N) 

SEG${A$,N1,N2) 

RANDOMIZE 

M“LEN{A$)—N+1 

SEG$(A$,M,N) 

INT(N*RND+1) 

BREAK 

TAB,(with comma) 

PRINT 

REM 


RESET 

SET 


NEXT 

PRINT ., FOR .. PRINT * " 
NEXT . 

CALL CHAR CALLHCHAR 
CALLCHAR CALLHCHAR 

* I mproved capahll fty with muJtMi ne statements 
in Extended BASIC. 


Commands Not Available In Tl BASIC** 


ERL 
ERR 
ERROR 
ON ERROR 


PEEK 

POKE 

POS 

RESUME 


STRINGS 

USR 

VARPTR 
PRINT USING 


** 


Most of the equivalent commands are available in 
Tl Extended BASIC. 


but the speed was disappointing. In the 
TRS-80 version it was necessary to in¬ 
sert “dummy” FOR . . . NEXT loops to 
slow down the rotation of the wheels; 
the Tl version, on the other hand, was 
too slow right from start. 

The single enhancement I had made 
to the TRS-80 version was to have the 
wheels stop one at a time, to prevent 
giving away the final result of the pull 
during rotation. To keep the wheels 


moving at a constant speed on the Tl- 
99/4, I included dummy counting loops 
as each wheel was stopped. In spite of 
its lack of speed, the richness of the Tl- 
99/4 graphics made the Tl BASIC 
program a more appealing simulation of 
real slot machine action than the 
TRS-80 version. 

To summarize, if the program you 
want to convert is a number cruncher 
with few graphics, the conversion should 



An Example of Code Translation 

From TRS-80 BASIC to Tl BASIC 

120 

FOR 11 = 1 TO NI 

130 

IF IZ(I1H^0 THEN PRINT “THIS ITEM 

DROPPED"; IDS: GOTO 160 

140 

IF K$=K1 $ THEN IF C1(I1)=0 GOTO 160 

ELSE C2=10*C 1(11)+200 

150 

DX=C3—C2 

160 

NEXT 


Translates to: 

120 

FOR 11 = 1 TO NI 

130 

IF IZ(I1)=0 THEN 140 

132 

PRINT “THIS ITEM DROPPED”;ID$ 

134 

GOTO 160 

140 

IF K$<=-K1$ THEN 150 

142 

IF C1(I1)=0 THEN 160 

144 

C2=10*C1(I1)+200 

150 

DX=C3—C2 

160 

NEXT 11 


go smoothly and result in a Tl BASIC 
program which runs with speed roughly 
comparable to its TRS-80 cousin. But if 
the program involves the heavy use of 
graphics, expect to rewrite it. And if 
the program is poorly documented to 
boot, keep a bottle of aspirin handy. 
Furthermore, because of the limitations 
of the Tl BASIC IF. .. THEN ... ELSE, 
and the lack of a PRINT AT command, 
you can expect nearly every converted 
program to increase in length. On the 
plus side, however, the extended varia¬ 
ble names available in Tl BASIC make it 
possible to enhance the quality of the 
documentation and structure of the re¬ 
written program. 

One final note: Tl’s new Extended 
BASIC command module adds the 
PRINT AT and PRINT USING state¬ 
ments, the capability of controlling up 
to 28 moving objects simultaneously, 
improved IF . . . THEN . . . ELSE capa¬ 
bility, and supports true subroutine def¬ 
inition (a significant aid in structuring 
programs). Although Extended BASIC 
probably won't alter the need for 
rewriting graphics programs, it should 
make the job a lot easier. 



PLEASE DONT FORGET TO 
RETURN THE QUESTIONNAIRE 
ON THE FRONT BIND-IN CARD. 
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Battle At Sea ... from p. 26 

1290 0S=22 
1300 RETURN 
1310 PR*=*S5* 

1320 LE=2 
1330 S=S 
1340 0S=28 
1350 RETURN 
1360 NEXT S 

1370 CALL HCHAR(22,1,32,64) 

13SO GOTO 2230 
1390 L=LEN(PRS) 

1400 SUS*="ENTER ROW, COL- FOR "&STR*(LE)V SPACES" 
1410 FOR X=1 TO LEN(SUS*) 

1420 SU1 *»SEG*_ (SUS*, X , 1) 

1430 CALL VCHAR(22,X +2,ASC(SU1 *) ) 

1440 NEXT X 

1450 PR*=PR$St" SPACE" 

1460 CALL HCHAR(23,2,32,30) 

1470 FOR X»1 TO LEN(PR*> 

1480 SU1*=SEG*(PR*,X,1) 

1490 CALL VCHAR(23,X+2,ASC(SU1*)> 

1500 NEXT X 

1510 FOR X=1 TO LE 

1520 CALL HCHAR<23,20,35) 

1530 CALL VCHAR(23,21,LE—X+49) 

1540 CALL KEY(O,K1,ST) 

1550 IF ST=0 THEN 1540 
1560 IF Kl<65 THEN 1590 
1570 IF K1>74 THEN 1590 
15S0 GOTO 1610 
1590 CALL SOUND(100,-2,2) 

1600 GOTO 1540 
1610 CALL VCHAR(23,23,Kl) 

1620 CALL KEY(O,KE,ST) 

1630 IF ST=—1 THEN 1620 
1640 CALL KEY(O,K2,ST) 

1650 IF ST=0 THEN 1640 
1660 IF K2<48 THEN 1690 
1670 IF K2>57 THEN 1690 
16B0 GOTO 1710 
1690 CALL SOUND(lOO,-2,2) 

1700 GOTO 1640 
1710 CALL VCHAR(23,24,K2) 

1720 SH(S,X,1)®K1—64 
1730 SHCS,X,2)“K2-47 
*1735 IF P(K1-64,K2—47)>0 THEN 1590 
1740 P(K1—64,K2—47> =5 
1750 NEXT X 
1760 GOSUB 5350 

1770 IF SH(5,1,1)=SH(S,2,1)THEN 1800 
1780 X2=l 
1790 GOTO 1810 
1800 X2-2 

1810 FOR X3=l TO LE 
1B20 F=0 

1B30 FOR X1=1 TO LE-X3 
1B40 IF SH(S,X1,X2)=0 THEN 1900 
1850 IF SH(S,XI,X2)<SH(S,Xl + 1,X2)THEN 1900 
I860 5W=SH(S,XI,X2) 

1870 SH(S,XI,X2)=SH<5,Xl+1,X2> 

18B0 SH(S.Xl+l,X2)—SW 
1890 F-1 
1900 NEXT XI 
1910 IF F=0 THEN 1930 
1920 NEXT X3 
1930 FOR X=1 TO LE-1 

1940 IF SH < 5, X, IX >SH (S, X+l, 1)—1 THEN 1970 
1950 NEXT X 
1960 GOTO 2060 
1970 FOR X=1 TO LE-1 

19B0 IF SH(S, X,2)OSH (S, X + l,2>—1 THEN 2010 
1990 NEXT X 
2000 SOTD 2060 
2010 CALL SOUND<100,-2,2) 

. 2020 FOR X=1 TO LE 
2030 P<SH(S,X,1),5H<5,X,2))=0 
2040 NEXT X 
2050 GOTO 1460 * 

2060 X=S 

2070 FOR Xl=l TO 5 
2080 IF SH(X,X1,1)=0 THEN 2180 
2090 IF SH(X,1,1> =SH < X,2,1)THEN 2120 
2100 0SA=1 
2110 GOTO 2130 
2120 05A=0 

2130 P<SH(X,XI,1),SH<X,XI,2))=X 
2140 IF X>1 THEN 2170 

2150 CALL VCHAR(SH(X,XI,1>+4,SH(X,XI,2)+17, 

I 95+Xl+OS+((LE-1)*OSA)) 


2160 GOTO 2180 

2170 CALL HCHAR < SH(X,X1,1)+4,SH(X,X1,2)+17, 
95+Xl+OS+(LE*OSA)) 

2180 NEXT XI 

2190 IF X>1 THEN 2220 

2200 CALL HCHAR(SH(1,4,1)+4,SH<1,4,2)+17, 
97+((LE-1)*OSA>) 

2210 CALL HCHAR(SH(1,5,1)+4,SH(1,5,2)+17, 
99+((LE-1> SOSA)> 


2220 

RETURN 

2230 

LE=4 

2240 

S=1 

2250 

GOSUB 2390 

2260 

CE=3 

2270 

S=2 

2 2 BO 

GOSUB 2390 

2290 

LE=2 

2300 

S=3 

2310 

GOSUB 2390 

2320 

LE=2 

2330 

S=4 

2340 

GOSUB 2390 

2350 

LE=1 

2360 

5=5 

2370 

GDSUB 2390 

2330 

GOTO 2610 


2390 X2—INT(RND*2> +1 

2400 IF X2=2 THEN 2440 

2410 X=INT(RND*(10-LE))+1 

2420 X1=INT(RND*10)+1 

2430 GOTO 2460 

2440 X=INT(RND*10)+1 

2450 X1»INT(RND*t10-LE))+1 

2460 ON X2 GDTO 2470,2540 

2470 FOR Y=X TO X+LE 

2480 IF O < Y,XI)>0 THEN 2390 

2490 NEXT Y 

2500 FOR Y=X TO X+LE 

2510 O(Y,X1)=S 

2520 NEXT Y 

2530 RETURN 

2540 FOR Y=X1 TO Xl+LE 
2550 IF 0(X,Y)>0 THEN 2390 
2560 NEXT _Y 

2570 FOR Yixi TO Xl+LE 

2580 0(X,Y)=S 

2590 NEXT Y 

2600 RETURN 

2610 m*=”MY SHOT" 

2620 M2*="YOUR SHOT” 

2630 M3*='* SCORE " 

2640 M4*=“COMPUTER" 

2650 M5*="USER" 

2660 M6*=“Y0U MISSED" 

2670 M7*="I MISSED" 

2680 M8*=“**HIT**“ 

2690 GOTO 2780 
2700 FOR V=1 TO 7 

2710 CALL HCHAR(18,V+4,ASC(SEG*(Ml*,V,1))) 

2720 NEXT V 

2730 RETURN 

2740 FOR V=1 TQ 9 

2750 CALL HCHAR(21,V+4,ASC(SEG*(M2*,V,1))) 

2760 NEXT V 

2770 RETURN 

2780 FOR X=1 TO 5 

2790 CALL HCHAR(18,X+22,ASC(SEG*(M3*,X,1>)) 

2800 NEXT X 

2810 FOR X=1 TO 8 

2820 CALL HCHAR(19,X+15,ASC(SEG*(M4*,X,1))) 

2830 NEXT X 

2840 FOR X=1 TO 4 

2850 CALL HCHAR(19,X+26,ASC(SEG*(M5*, X, 1)) ) 
2860 NEXT X 
2870 T=1 

2880 IF T=0 THEN 2910 
2890 T=0 
2900 GOTO 3180 
2910 T=1 

2920 CALL HCHAR(21,3,32,12) 

2930 CALL HCHAR(22,3,32,7) 

2940 GDSUB 2700 

2950 IF W>0 THEN 3630 

2960 RANDOMIZE 

2970 X= INT(1Of RND)+1 

2980 X1 = INT <10 SRND)+1 

2990 H=X 

3000 HI*XI 

3010 IF P(X,XI)=7 THEN 2960 
3020 IF P(X,X1)=6 THEN 2960 
3030 CALL HCHAR(19,6,H+64) 


^ Note 

Line 1735 was inserted as a 
last-minute enhancement 
to the program just prior 
to press time. If you have 
been using the automatic 
NUM mode, please exit it 
(by pressing ENTER) to 
type in this line. Then go 
back into it (NUM 1740,10) 
for convenience in entering 
the rest of the program. 


36 99'er Magazine July/August 1981 



Battle At Sea ... 

3040 CALL HCHAR(19,7,HI+47) 

3050 IF P ( X , X1)>0 THEN 4460 

3060 GOSUB 3100 

3070 SOTO 2880 

3080 P(X+10,Xl)=7 

3090 CALL HCHAR<23,1,32,32) 

3100 P(X,XI)=6 

3110 CALL SOUND(200,-6,2) 

3120 CALL HCHAR(23,1,32,32) 

3130 CALL VCHAR(X+4,X1+17,144) 

3140 FOR Y=1 TO 8 

3150 CALL VCHAR(23,12+Y,ASC(SEG*(M7*,Y,1)>) 
3160 NEXT Y 
3170 RETURN 

3180 CALL HCHAR(18,3,32,12) 

3190 CALL HCHAR(19,3,32,7) 

3200 GOSUB 2740 

3210 CALL KEY(Q,K1,ST) 

3220 IF ST=0 THEN 3210 
3230 IF Kl<65 THEN 3210 
3240 IF K1>74 THEN 3210 
3250 CALL VCHAR(22,6,K1) 

3260 CALL KEY(O,KE,ST) 

3270 IF ST=—1 THEN 3260 
3280 CALL KEY(0.K2,ST> 

3290 IF ST=0 THEN 3280 
3300 IF K2<48 THEN 3280 
3310 IF K2>57 THEN 3280 
3320 CALL VCHAR(22,7,K2) 

3330 K3=K1—64 
3340 K4-K2-47 

3350 IF D(K3,K4)<6 THEN 3390 
3360 CALL SOUND(50,110,2) 

3370 CALL HCHAR(22,6,32,7) 

3380 GOTO 3180 

3390 IF D(K3,K4)=0 THEN 3500 
3400 CALL SOUND(200,220,2,330,2,440,2,-6,2) 
3410 CALL SOUND(400,110,2,220,2,330,2,-8,2) 
3420 CALL VCHAR(K3+4,K4+5,136) 

3430 SF=0(K3,K4> 

3440 0(K3,K4)=7 

3450 CALL HCHAR(23,1,32,32) 

3460 FOR X2=l TO 7 

3470 CALL HCHAR(23,13+X2,ASC(SEG*(MB*,X2,1))> 

34BO NEXT X2 

3490 GOTO 4600 

3500 CALL SDUND(200,-6,2) 

3510 CALL HCHAR(23,1,32,32) 

3520 0(K3,K4)=6 
3530 FOR X2=1 TO 10 

3540 CALL VCHAR(23,13+X2,ASC(SEG*CM6*,X2,1))> 
3550 NEXT X2 

3560 CALL VCHAR(K3+4,K4+5,144) 

3570 GOTO 2880 
3580 CH=1 
3590 GOTO 4650 
3600 CH=0 

3610 ON 5F GOSUB 1110,1160,1210,1260,1310 

3620 IF DS(SF)=LE-1 THEN 3780 

3630 IF H=10 THEN 3670 

3640 IF P(H+l,Hi)< >7 THEN 3660 

3650 IF W>1 THEN 4260 ELSE 4060 

3660 IF H=1 THEN 3720 

3670 IF P(H-1,HI)< >7 THEN 3720 

3680 IF W>1 THEN 4260 ELSE 4060 


3930 X3—1 
3940 X2=0 

3950 IF H+X2>10 THEN 3780 
3960 IF H+X2<1 THEN 3780 
3970 IF HI+X3>10 THEN 3780 
3980 IF Hl+X3<1 THEN 3780 
3990 IF P(H+X2,H1+X3)=6 THEN 3780 
4000 IF P(H+X2,H1+X3 )—7 THEN 3780 
4010 X=H+X2 
4020 X1—HI+X3 

4030 JF P(X,X1)>0 THEN 4460 
4040 GOSUB 3100 
4030 GOTO 2880 
4060 IF H=10 THEN 4160 
4070 H=H+1 

4080 IF P(H,H1)=7 THEN 4060 
4090 IF P <H,HI)=6 THEN 4160 
4100 X=H 
4110 X1=H1 

4120 IF P(X,X1)>0 THEN 4460 

4130 GOSUB 3100 

4140 H=H-1 

4150 GOTO 2880 

4160 IF H=1 THEN 4070 


4170 H=H—1 

4180 IF P(H,HI)=7 THEN 4160 
4190 IF P(H,HI>=6 THEN 4060 
4200 X=H 
4210 Xl=Hl 

4220 IF P(X,X1)>0 THEN 4460 

4230 GOSUB 3100 

4240 H=H+1 

4250 GOTO 2880 

4260 IF Hi=10 THEN 4360 

4270 H1=H1+1 

4280 IF P(H,HI)=7 THEN 4260 
4290 IF P(H,HI)=6 THEN 4360 
4300 X=H 
4310 X1=H1 

4320 IF P(X,X1)>0 THEN 4460 
4330 GOSUB 3100 
4340 H1=H1—1 


4350 GOTO 2BBO 

4360 IF Hl=l THEN 4260 

4370 H1=H1—1 

43B0 IF P(H,HI)=7 THEN 4360 
4390 IF P(H,HI)=6 THEN 4260 
4400 X=H 


4410 X1=H1 

4420 IF P(X,X1)>0 THEN 4460 
4430 GOSUB 3100 
4440 H1=H1+1 
4450 GOTO 2B80 

4460 CALL VCHAR(4+X,17+X1,136) 

4470 CALL HCHAR(23,1,32,32) 

4480 GOSUB 2700 

4490 FOR 2=1 TO LEN(M8«) 

4500 CALL HCHAR(23,14+Z,ASC(SEG*(MB*,Z,1))) 
4510 NEXT Z 


4520 CALL SOUND(200,220,2,330,2,440,2,-8,2) 
4530 CALL SOUND(300,110,0,220,0,330,0,-B,0) 
4540 SF=P(X,X1) 

4550 CALL VCHAR(19,6,X +64) 

4560 CALL VCHAR(19,7.X1+47) 

4570 PCX,XI)=7 
4580 H=X 
4590 H1=X1 


3690 W2=W 

3700 W=W1 

3710 GOTO 3560 

3720 IF Hl=10 THEN 3760 

3730 IF P(H,H1+1)< >7 THEN 3750 

3740 IF W>1 THEN 4060 ELSE 4260 

3750 IF HI=1 THEN 3780 

3760 IF P(H,HI—1)< >7 THEN 3780 

3770 IF W>1 THEN 4060 ELSE 4260 

3780 L1=INT(RND42)+1 

3790 ON LI SOTO 3800.3880 

3800 X2=INT(RND*2>+1 

3810 ON X2 GOTO 3820,3850 

3820 X2=l 

3830 X 3=0 

3840 GOTO 3950 

3850 X2=-l 

3860 X3=0 

3870 GOTO 3950 

3880 X3=INT(RNDt2)+l 

3890 ON X3 GOTO 3900,3930 

3900 X3=l 

3910 X2=0 

3920 GOTO 3950 


4600 FOR X2=l TO 5 

4610 DSCX2)=0 

4620 NEXT X2 

4630 FOR X2=l TO 10 

4640 FOR X3=l TO lO 

4650 IF CH=1 THEN 4670 

4660 IF T=0 THEN 4720 

4670 IF P(X2,X3)=0 THEN 4760 

4630 IF P(X2,X3)=6 THEN 4760 

4690 IF P(X2,X3)=7 THEN 4760 

4700 DS(P(X2,X3))=DS(P(X2,X3))+1 

4710 GOTO 4760 

4720 IF 0CX2,X3)=0 THEN 4760 

4730 IF 0(X2,X3>=6 THEN 4760 

4740 IF 0(X2,X3)=7 THEN 4760 

4750 DS(0(X2,X3))=DS(O(X2,X3))+1 

4760 NEXT X3 

4770 NEXT X2 

4780 IF CH=1 THEN 3600 

4790 W=G 

4800 SC0RE=0 

4810 FOR Z4=l TO 5 

4820 ON Z4 GOSUB 1110,1160,1210,1260,1310 


Continued on p, 87 


i 
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DENfE 


OTHER PRODUCTS NOW OR SOON AVAILABLE FROM DENALI DATA DESIGN 



DSYfl 


I 


DENALI DATA DESIGN 
ARTI-STIC* 

JOYSTICK ADAPTER 

Allows the use of faster, 
smoother-acting, low cost, 

Atari™ Joystick on Tt 99/4 & 4A 

JUST PLUG IN AND PLAY 

$20 postpaid 


SCREEN GRAPHICS LAYOUT SHEETS (including sprite definition grids) 

* MONITOR SCREEN OVERPLAY (Grid on clear filmto find where those characters are really at.) 

* CODING SHEETS (basic & x-basiC) 

HARDWAR 

* ARTI-STIC™(JOYSTICK ADAPTER) ALLOWS THE USE OF FASTER. SMOOTHER-ACTING, LOW COST, atari™ 
JOYSTICKS ON Tl 99/4 & 4A JUST PLUG IN AND PLAY 

* JOYPAO™ PLUGS INTO JOYSTICK CONNECTOR ON 99/4 & 99/4A AND ALLOWS DIREC¬ 
TION & NUMERIC ENTRY IN ONE HAND HELD UNIT, (requires support software —supplied in 

BASIC AND X-BASIC ON TAPE OR DISK.) 

* 9 PIN & 25 PIN EXTENSION CABLES (SAME PLUGS AS ON JOYSTICK, CASSETTE & RS-232 ports.) 

* STACKER BUS'“ (ALLOWS VERTICAL STACKING OF UP TO 4 PERIPHERAL DEVICES.) 

* BACKER BUS™ (ALLOWS PLACEMENT OF PERIPHERALS BEHIND CONSOLE.) 

* SPLIT-T BOX M (DOUBLE T-SWITCH FOR RS232. ALLOWS FOUR DEVICES TO BE PLUGGED 
INTO RS232 WITH HARDWARE SWITCHES TO ELIMINATE THE NEED FOR CABLE¬ 
SWITCHING.) (SOFTWARE SWITCHABLE AVAILABLE LATER THIS YEAR.) 


$20 postpaid % 

Adapter + 2 Atari Joysticks 

S35 


SOFTWARE 


Please add $2.00 for shipping 


* CHECK BOOK RECONCILIATION (REQUIRES joypaD) 

* SCREEN TO EPSON MX80™ BLOCK GRAPHICS DUMP (requires joypad) 

Dealer 
Inquiries 
Invited 


SEND OR CALL FOR 
FURTHER INFORMATION 


Toll Free 1-800-654-8499 
In OK dial 1-405-524-7764 


1413 N. McKINLEY 
OKC, OK. 73106 


Harried Housewife . . . from p. 28 

780 CALL CHAR <157,"09OAOC0808“) 

790 CALL CHAR<158,”A119070101 H ) 

800 CALL CHAR <159,"O™) 

810 GOSUB 3070 
820 TIME=0 
830 MATCH=0 

840 DIM HH<16),WORK<16) 

850 CALL CHAR (43, "FFFFFFFFFFFFFFFF'*) 

860 CALL CHAR<44,"O") 

870 CALL SOUND(4225,44000,30) 

B80 CALL SOUND<4,44000,30) 

390 CALL CLEAR 
900 CALL SCREEN(12) 

910 CALL COLOR<2,6,9) 

920 SOSUB 2040 
930 GOSUB 3370 

940 DATA 72,79,85,83,69,87,79,82,75 

950 RESTORE 940 

960 FOR Y=23 TO 31 

970 READ GR 

980 CALL HCHAR<2,Y,GR> 

990 NEXT Y 

lOOO DATA 77,65,84,67,72,32,50 

101Q RESTORE lOOO 

1020 FOR Y=23 TO 29 

1030 READ GR 

1040 CALL HCHAR(5,Y,GR) 

1050 NEXT Y 

1060 DATA 76,69,84,84,69,32,83 

1070 RESTORE 1060 

1080 FOR Y=23 TO 29 

1090 READ GR 

UOO CALL HCHAR (6, Y,GR) 

1110 NEXT Y 

1120 CALL COLOR<8,7,1) 

1130 CALL HCHAR<8,25,95) 

1140 CALL HCHAR<8,27,95) 

1150 CALL KEY(O,Kl,ST) 

1160 IF Kl=83 THEN 1830 
1170 IF Kl<65 THEN 1150 
1180 IF K1>80 THEN 1150 
1190 CALL HCHAR<8,25,Kl) 

1200 S5=1 

1210 ON <K1-64)GOSUB 5350,5390,5430,5470,5510,5550, 
5590,5630,5670,5710,5750,5790,5830,5870,5910, 
5950 

1220 IF CH(1X>0 THEN 1250 
1230 GOSUB 4430 
1240 GOTO 1260 

1250 ON CH(1)GOSUB 2290,2400,2480,2590,2680,2770, 
2870,2970 

1260 CALL KEY(0,K2,ST) 

1270 IF K2=S3 THEN 1830 

1280 IF K2<65 THEN 1260 

1290 IF K2>80 THEN 1260 

1300 IF K2=K1 THEN 1260 

1310 CALL HCHAR(8,27,K2) 

1320 SS=2 


1330 ON (K2-64)GOSUB 5350,5390,5430,5470,5510,5550, 
5590,5630,5670,5710,5750,5790,5830,5870,5910, 
5950 

1340 IF CH(2)< >0 THEN 1380 

1350 GOSUB 4430 

1360 GOTO 1400 

1370 IF CH<1)—O THEN 1400 

1380 ON CH(2)GOSUB 2290,2400,2480,2590,2680,2770, 
2870,2970 

1390 IF CH<1)=CH(2)THEN 1620 

1400 TIME=TIME+1 

1410 IF TIME*10 THEN 1550 

1420 IF TIME*12 THEN 1440 

1430 GOTO 4480 

1440 CALL HCHAR<22, 2,32,31) 

1450 DATA 79,72,32,78,79,33,32,75,73,68,83,32,63, 
82, 69,32,72,79,77,69,33 
1460 RESTORE 1450 
1470 FOR Y=3 TO 23 
1480 READ GR 

1490 CALL HCHAR<24,Y,GR) 

1500 NEXT Y 
1510 GOSUB 2040 
1520 GOSUB 3370 
1530 TIME=0 
1540 GOTO 4480 

1550 DATA 83,80,69,69,68,59,32,75,73,68,83,32,87, 
73,76,76,32,66,69,32,72,79,77, 69,32,B3,79, 
79,78,33 

1560 RESTORE 1550 

1570 FOR Y=2 TO 31 

1580 READ GR 

1590 CALL HCHAR<22,Y,GR) 

1600 NEXT Y 

1610 GOTO 4480 

1620 CALL SOUND<lOOO,440,2) 

1630 MATCH=MATCH+1 

1640 IF MATCHOl THEN 1710 

1650 DATA 70,73,78,73,83,72,69,68,58 

1660 RESTORE 1650 

1670 FOR Y=23 TO 31 

1680 READ GR 

1690 CALL HCHAR(11,Y,GR) 

1700 NEXT Y 
1710 X=MATCH+9 
1720 Y=26 

1730 ON CH(1)GOSUB 3610,3700,3780,3870,4030,4110, 
4250,4340 
1740 HHtKl-64)=0 
1750 HH<K2—64)*0 
1760 IF MATCHOS THEN 1400 

1770 DATA 67,76,69,65,78,32,72,79,85,83,69,33,33 

1780 RESTORE 1770 

1790 FOR Y=3 TO 27 STEP 2 

1800 READ GR 

1810 CALL HCHAR(24,Y,GR> 

1820 NEXT Y 

1830 CALL HCHAR(8,25,83) 

1840 GOSUB 3570 
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1850 

1860 

1870 


1880 


1890 

1900 

1910 

1920 

1930 

1940 

1950 

1960 

1970 


1980 

1990 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 


2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2470 

2480 

2490 

2500 

2510 

2520 

2530 

2540 

2550 

2560 

2570 

2580 

2590 

2600 

2610 

2620 

2630 


FOR S*1 TO 16 
SS=3 

ON S GOSUB 5350,3390,5430, 
5470,5510,5550,5590,S630, 
5670,5710,5750,5790,5830, 
5870,5910,5950 
ON CH(SS)60SUB 2290,2400, 
2480,2590,2680,2770,2870, 
2970 
NEXT S 

CALL HCHAR(21,3,32,6) 

CALL HCHAR(22,2,32,31) 

IF MATCHOB THEN 1970 

FOR X=2 TO 8 

CALL HCHAR(X,23,32,9) 

NEXT X 
GOTO 2030 

DATA 72,79,85,83,69,87,79, 

82,75,32,78,69,86,69,82,32, 

69,78,68,83,33 

RESTORE 1970 

FOR Y=3 TO 23 

READ GR 

CALL HCHAR(24,Y,GR) 

NEXT Y 
GOTO 2030 

FOR Z=1 TO 11 STEP 10 

FOR X=Z TO Z+4 

FOR Y=2 TO 12 STEP 10 

CALL SOUND(lOO,1047,2) 

CALL HCHAR(X,Y,43,5) 

CALL HCHAR(X,Y+5,44,5) 

CALL SOUND(100,523,2) 

CALL HCHAR(X+5,Y,44,5) 

CALL HCHAR<X+5,Y+5,43,5) 
NEXT Y 
NEXT X 
NEXT Z 

DATA 3,4,3,9,3,14,3,19,8,4, 
8,9,8,14,8,19,13,4,13,9,13, 
14,13,19,18,4,18,9,18,14, 
18,19 

RESTORE 2160 
FOR CC=65 TO 80 
READ X,Y 

CALL HCHAR(X,Y,CC> 

NEXT CC 

CALL HCHAR<21,3,S3) 

CALL HCHAR(21,4,61) 

CALL HCHAR(21,5,83) 

CALL HCHAR(21,6,84) 

CALL HCHAR<21,7,79) 

CALL HCHAR<21,8,SO) 

RETURN 

CALL HCHAR<X-1,Y,96) 

CALL HCHAR<X-l,Y-l,103) 

CALL HCHAR(X-l,Y+l,97) 

CALL HCHAR<X,Y-l,98) 

CALL HCHAR(X,Y,99) 

CALL HCHAR(X,Y+l,100) 

CALL HCHAR(X+l,Y-l,101) 

CALL HCHAR(X+1,Y,102) 

CALL HCHAR(X+l,Y+1,103) 

GOSUB 3650 

RETURN 

CALL HCHAR<X-l,Y-l,104,2) 
CALL HCHAR<X,Y,109) 

CALL HCHAR<X—1,Y+l,105) 

CALL HCHAR(X,Y-l,106) 

CALL HCHAR(X,Y+l,107) 

CALL HCHAR<X+l,Y-l,108,3) 

GOSUB 3740 

RETURN 

CALL HCHAR<X-l,Y-l,112) 

CALL HCHAR(X-l,Y,113) 

CALL HCHAR<X-1,Y+l,114) 

CALL HCHAR(X,Y-l,115) 

CALL HCHAR<X,Y,116) 

CALL HCHAR(X,Y+l,117) 

CALL HCHAR(X+l,Y-l,119) 

CALL HCHAR(X+l,Y+l,119) 

CALL HCHAR(X+l,Y,118) 

GOSUB 3820 
RETURN 

CALL HCHAR(X-l,Y-l,120) 

CALL HCHAR(X-l,Y,121) 

CALL HCHAR(X-l,Y+l,122) 

CALL HCHAR<X,Y-l,123) 

CALL HCHAR(X,Y,124) 


2640 CALL HCHAR(X,Y+l,125) 3530 
2650 CALL HCHAR(X+l,Y-l,126,3) 3560 
2660 GOSUB 3980 3570 
2670 RETURN 3580 
2680 CALL HCHAR<X,Y-l,128) 3590 
2690 CALL HCHAR(X-l,Y-l,133,3) 3600 
2700 CALL HCHAR(X+1,Y+l,1331 3610 
2710 CALL HCHAR(X,Y,129) 3620 
2720 CALL HCHAR(X,Y+1,130) 3630 
2730 CALL HCHAR(X+l,Y-l,131) 3640 
2740 CALL HCHAR(X+l,Y,132) 3650 
2750 GOSUB 4070 3660 
2760 RETURN 3670 
2770 CALL HCHAR(X-l,Y-l,136) 36B0 
2780 CALL VCHAR(X-l,Y+l,142,2) 3690 
2790 CALL HCHAR(X+l,Y-l,142) 3700 
2800 CALL HCHAR(X-l,Y,137) 3710 
2810 CALL HCHAR(X,Y-l,138) 3720 
2820 CALL HCHAR(X,Y,139) 3730 
2830 CALL HCHAR(X+l,Y.140) 3740 
2840 CALL HCHAR(X+l,Y+l,141) 3750 
2850 GOSUB 4210 3760 
2860 RETURN 3770 
2870 CALL HCHARCX-l,Y-1,144) 3780 
2880 CALL HCHAR(X-l,Y,149,2) 3790 
2890 CALL HCHAR(X+l,Y,149) 3800 
2900 CALL HCHAR(X,Y-l,145) 3810 
2910 CALL HCHAR(X,Y,146) 3820 
2920 CALL HCHAR(X,Y+1,147) 3830 
2930 CALL HCHAR(X+l,Y-l,143) 3840 
2940 CALL HCHAR(X+l,Y+l,148) 3850 
2950 GOSUB 4290 3B60 
2960 RETURN 3870 
2970 CALL HCHAR(X-l,Y-l,152) 3830 
2980 CALL HCHAR(X-l,Y,153) 3890 
2990 CALL HCHAR(X-l,Y+l,154) 3900 
3000 CALL HCHAR(X,Y-l,155) 3910 
3010 CALL HCHAR(X,Y,156) 3920 
3020 CALL HCHAR (X+l, Y-l, 157) 393 <> 
3030 CALL HCHAR(X+l,Y,158) 3940 
3040 CALL VCHARfX,Y+l,159,2) 3950 
3050 GOSUB 4380 3960 
3060 RETURN 39 70 
3070 X=3 3980 
3080 Y=5 3990 
3090 GOSUB 2290 4000 
3100 X«4 4010 
3110 Y=16 4020 
3120 GOSUB 2400 4030 
3130 Y=27 4040 
3140 GOSUB 2480 4050 
3150 X=8 4060 
3160 Y=7 4070 
3170 GOSUB 2590 4080 
3180 X=10 4090 
3190 Y»26 4100 
3200 GOSUB 2680 4110 
3210 X=17 4120 
3220 GOSUB 2770 4130 
3230 X=16 4140 
3240 Y=15 4150 
3250 GOSUB 2870 4160 
3260 X=15 4170 
3270 Y=6 4180 
3280 GOSUB 2970 4190 
3290 CALL SOUND(300,494,2,196,7) 4200 
3300 CALL SOUND(200,440,2) 4210 
3310 CALL SOUND(200,392,2) 4220 
3320 CALL SOUND(300,440,2,185,8) 4230 
3330 CALL SOUND<200,392,3) 4240 
3340 CALL SOUND(200,370,3) 4250 
3350 CALL SOUND(lOOO,392,3,165,9) 4260 
3360 RETURN 4270 
3370 FOR Z=1 TO 8 4280 
3380 WORK(Z)=Z 4290 
3390 WORK(Z +8)= Z 4300 
3400 NEXT 2 4310 
3410 RANDOMIZE 4320 
3420 FOR R=1 TO 16 4330 
3430 RR=INT(16*RND)+1 4340 
3440 IF WORK(RR)=0 THEN 3430 4350 
3450 HH < R)=WORK(RR) 4360 
3460 WORK(RR)=0 4370 
3470 NEXT R 4380 
3480 FOR R=1 TO 16 4390 
3490 WORK(R)=HH(R > 4400 
3500 NEXT R 4410 
3510 MATCH=0 4420 
3520 FDR X=ll TO 18 4430 
3530 CALL HCHAR(X,23,32,9) 4440 
3540 NEXT X 


CALL HCHAR(24,3,32,22) 
RETURN 

FOR Rs* 1 TO 16 
HH(R)“WORK(R) 

NEXT R 
RETURN 

CALL COLOR(9,15,7) 

CALL COLOR<9,7,15) 

CALL COLOR(9,15,7) 

CALL COLOR(9,7,15) 

CALL HCHAR(X+2,Y-l,68) 
CALL HCHAR(X+2,Y,85) 
CALL HCHAR(X+2,Y+l,33) 
CALL HCHAR(X+2,Y+2,84) 
RETURN 

CALL COLOR(10,12,13) 
CALL COLOR(10,13,12) 
CALL COLOR(10,12,13) 
CALL COLOR(10,13,12) 
CALL HCHAR(X+2,Y-l,83) 
CALL HCHAR(X+2,Y,69) 
CALL HCHAR(X+2,Y+l,B7) 
RETURN 

CALL COLOR<11,11,14) 
CALL COLOR<11,14,11) 
CALL COLOR(11,11,14) 
CALL COLOR(11,14.11) 
CALL HCHAR(X+2,Y-l,87) 
CALL HCHAR(X+2,Y,6S) 
CALL HCHAR(X+2,Y+l,83) 
CALL HCHAR(X+2,Y+2,72) 
RETURN 

CALL COLOR(12,3,16) 

CALL COLOR(12,16,3) 

CALL COLOR(12,3,16) 

CALL COLOR(12,16,3) 

CALL HCHAR(X+2.25,68) 
CALL HCHAR(X+2,26,73) 
CALL HCHAR(X+2,27,83) 
CALL HCHAR(X+2,28,72) 
CALL HCHAR(X+2,29,69) 
CALL HCHAR(X+2,30,83) 
RETURN 

CALL HCHAR(X+2,Y-l,68) 
CALL HCHAR(X+2,Y,73) 
CALL HCHAR(X+2,Y+l,83) 
CALL HCHAR(X+2,Y+2,72) 
RETURN 

CALL COLOR(13,12,7) 

CALL COLOR(13,7,12) 

CALL COLOR(13,12,7) 

CALL COLOR(13.7,12) 

CALL HCHAR(X+2,Y-l,67) 
CALL HCHAR<X+2,Y,79,2) 
CALL HCHAR(X+2,Y+2,75) 
RETURN 

CALL COLOR<14,8,5) 

CALL COLOR(14,5,8) 

CALL COLOR(14,8,5) 

CALL COLOR<14,5,8) 

CALL HCHAR(X+2,25,86) 
CALL HCHAR(X+2,26.65) 
CALL HCHAR(X+2,27,67) 
CALL HCHAR(X+2,28,85,2) 
CALL HCHAR(X+2,30,77) 
RETURN 

CALL HCHAR(X+2,Y-l,86) 
CALL HCHAR(X+2,Y,65) 
CALL HCHAR(X+2,Y+l,67) 
RETURN 

CALL COLOR(15,16,15) 
CALL COLOR(15,15,16) 
CALL COLOR(15,16,15) 
CALL COLOR(15,15,16) 
CALL HCHAR(X+2, Y-l, 83) 
CALL HCHAR(X+2,Y,72) 
CALL HCHAR(X+2,Y+l,79) 
CALL HCHAR(X+2,Y+2,80) 
RETURN 

CALL COLOR(16,16,3) 

CALL COLOR(16,3,16) 

CALL COLOR(16,16,3) 

CALL COLOR(16,3,16) 

CALL HCHAR(X+2,Y-l,73) 
CALL HCHAR(X+2,Y,82) 
CALL HCHAR(X+2,Y+l,79) 
CALL HCHAR(X+2,Y+2,78) 
RETURN 

CALL HCHAR(X,Y-l,68) 
CALL HCHAR(X,Y,79) 

Continued on p 
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ON-LINE 

INFORMATION 


X- , ■=■ 


This article has been excerpted from 

-' A State-of-the-Art Report, 
By Kapfan,Copyrigh t 1980 & 1981, 

Emerald 'daUey Publishing Co,, Eugene, 0 8. 


' - - *• * ^ 


Why Use It? 

Computerized information retrieval—a fairly recent development 
that didn’t achieve widespread acceptance until the late 1970's-is un¬ 
doubtedly the most important factor in the emergence of information 
brokering as a viable business opportunity for most of its current practi¬ 
tioners (the database search specialists, mentioned earlier). It is a fast, 
cost-effective method for retrieving bibliographic references, full text 
documents and files, and numerical data—all of it on an extremely di¬ 
verse range of topics. Although the process goes by a variety of names— 
i.e., online searching, computer-assisted literature searching, online re¬ 
trieval, on-line bibliographic searching, on-line non-bibliographic search¬ 
ing, computer database searching, etc. — the principal facts are that: 

• The process takes a fraction of the time of searching by manual 
methods, is less tiring, and is often cheaper in terms of a re¬ 
searcher's time. 

• The electronic databases are usually more comprehensive, more 
deeply indexed, and more frequently and readily updated than 
their printed counterparts. 

• An on-line interactive search can be re-directed (expanded or 
narrowed) instantly on the basis of results coming in. 

• Certain strategies (combining terms and concepts with Boolean 
operators, explained later) that are possible with a computer 
search are difficult or impossible with manual methods. 

• Searching can be done from the convenience of your own home 
or office, or even a client's office (if you have a portable termi¬ 
nal) through a simple hook-up to virtually any telephone. 


Types of Databases 


1. Bibliographic Databases — are the "machine-readable" (searchable by 
computer) counterparts of printed abstracts and indexes, but are not as 
limited in size or flexibility. They contain references to (and sometimes 
brief summaries of) "the literature" of numerous fields. Armed with 
the appropriate references (periodical names, issue dates, and article ti¬ 
tles/authors/pagination) on specific topics of interest, it's an easy mat¬ 
ter to get copies of the actual articles that contain (hopefully) the in¬ 
formation wanted. (In fact, some vendors are now offering the option 
of ordering printed or microfilm documents and articles while on-line, 
directly from the searcher's terminal—providing quick access to a 
"library” of literally millions of separate titles in a full spectrum of di¬ 
verse subject areas. Additionally, there's a substantial time savings: By 
typing in the order and shipment information yourself, right after iden¬ 
tifying the relevant titles on-line, the order gets immediately routed to 
the appropriate document delivery service. You pay this delivery service 
a set fee per document (which you can mark up and charge your clients 
that request this additional service) and typically cut a week from the 
normal delivery time. 


of itself; they are not surrogates which point to other documents (al¬ 
though some do indeed refer a search to other sources). Data may also 
be manipulated on-line to do analyses, generate reports, and make pre¬ 
dictions. Most of these databases are in the areas of business, finance 
and economics (e.g., value of product shipments, manufacturing data, 
securities and exchange rates, forecasts, and currency exchange rates). 
There are some databases in the social sciences and humanities contain¬ 
ing demographic information (e.g., census statistics). Presently, not very 
many numeric databases in science and technology are publicly availa¬ 
ble. 

3. Referral Databases — are the machine-readable counterparts of direc¬ 
tories; they provide references to individuals, institutions, and projects 
with "know-how" availability or need. These files are usually much 
more current than printed versions since they are easier to update at 




much shorter intervals. 


4. Miscellaneous Databases — that don't fall under the three previous I 
groupings are in areas such as regulatory, legislative, and judicial deci- : 
sions and status reports, as well as charts and maps. r 

Note: :; 

. i 

Several directories containing descriptions of the individual databases of 
these four groups are available in most libraries that perform on-fineit 
searches. Ask to see (1) Computer-Readable Data Bases: A Directory \ 


and Data Sourcebook r (2) Directory of On-Line information Resources ( j? 
or (3) Directory of On/ine Databases, \; 


;[■ 

j i 

The Power of Boolean Logic 


Most on-line search systems use Boolean (named after 19th centu-[ 
ry mathematician George Boole) operators. These are simply the basic ? 
combining operations performed on groups of documents or articles by:' 
the three symbols AND, OR, and NOT. The best way to illustrate the ' 
power of these search operators is to show their effects on different; 
search terms through simple diagrams (called Venn diagrams). In all of i; 
these that fallow, the shaded portions represent the items that are re-; 
trieved as a result of the combination. j- 


(1) The AND operator retrieves the articles that have both children(C) ; 

1 f 

and the consumption of milk(M) in common (e.g., the title "Consumpj: 
tion of Milk in Pre-school Children"). 


M AND C 





! i 

s 

c 




(2) The OR operator retrieves the articles that may or may not have! 
children(C) and consumption of milk(M) in common (e.g., the titled 
"Milk Sales Are Up 9% From Last Year" and "Public School Enroll¬ 
ment Declines" are both retrieved but have no common elements). ] 



No common elements Some common elements 



L 

f 


(3) The AND NOT operator retrieves the articles that have to do withi 
consumption of milk(M) but that also simultaneously exclude those? 
with specific references to children(C) - e.g., "Adults Drinking 150V 
More Milk Than A Decade Ago." 


2. Numeric Databases — are the machine-readable counterparts of hand¬ 
books and tables, but are not as limited in currency, accuracy, and com¬ 
pleteness. These types of files carry information which is useful in and 
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M AND NOT C 










Now if we want to make the search more specific, let's say that we need 
articles concerned with cases of milk poisoning in children (where poi¬ 
soning is represented by "P") the Boolean operators would be 

M AND C AND P 

The small shaded area in the center represents the retrieved articles. 



In this case, of course, you could do the search manually — i.e., through 
scanning the appropriate printed indexes — and might be able to retrieve 
a few articles related to this topic before fatigue set in. But consider the 
following search in the field of medicine, where a client needs to know 
the effects of blood coagulation disorders on heart disease in children. 
Here, you could just check printed indexes for the three subject head¬ 
ings "blood coagulation disorders," "heart disease," and "children," 
and hopefully you'd find something. But if your client needed (and ex¬ 
pected) all relevant information (to the extent that "all" is possible), 
you'd need to expand the search terms to include the other subject 
headings given in the cross references. Take for example: 


Blood coagulation disorders (B1) 
See also: 

anticoagulants (B2) 
blood disease (B3) 
blood coagulation (B4) 
blood platelets (B5) 
blood viscosity (B6) 
hematologic diseases (B7) 
hemmagglutination (B8) 
hemostatics (B9) 
thrombocytes (BIO) 


heart disease (HI) 
see also: 

cardiac arrest (H2) 
cardiology (H3) 
cardiovascular disease (H4) 
heart auculation (H5) 
children (Cl) 
see also: 
infants (C2) 


Here, you'd have to check under 17 subject headings in the printed in¬ 
dex (B1 to BIO, plus HI to H5, plus Cl & C2) and find all the journal 
articles that are related to 100possible combinations (10x5x2=100) of 
the 17 headings. 

These are combinations su.ch as 

B1 & HI & Cl (blood coagulation disorders, heart disease, & children) 
B2 8t HI & Cl (anticoagulants, heart disease, & children) 

B8 & H2 & Cl (hemmagglutination, cardiac arrest, & children) 

BIO & H5 & C2 (thrombocytes, heart auculation, & infants) 
plus 96 other combinations to search for! 

I think you can start to see how a computer search with Boolean 
operations can handle this awesome task much more effectively. After 
entering all the subject headings, you would command the computer to 
combine and search for the 100 expanded terms according to the fol¬ 
lowing logic : (B1 OR B2 OR B3 OR B4 OR B5 OR B6 OR B7 OR B8 
OR B9 OR B10) AND (HI OR H2 OR H3 OR H4 OR H5) AND (Cl 
OR 02). Then, in a flash, the computer at the other end tells you how 
many "hits" (articles) it found in the database. You can command it to 
list these titles and then decide for which ones you'd like the complete 
bibliographic citations (and abstracts, if available) printed out—either 
on your terminal/printer, or on their high-speed printer and mailed to 
you (a much cheaper option if the list is lengthy and the delivery time 
isn't critical). In effect, the computer has produced a very specialized 
and comprehensive reading list that a human working with manual 
methods alone, couldn't likely duplicate. 


Note: 

Interested readers who would like to kftow more about 
the field of information brokering may purchase the complete 
spiral-bound monograph from which this article has been 
excerpted (information Brokering: A Stateof-the-Art Report) 
for the special reduced price of $7, (Regular price is $10.) 
For postage information, see the bound-in order card in the 
back of this magazine. 


A Sample On-Line Search 


QUESTION 


What articles are available mi toward hiring the liandican ned 1 

FILE (fNFORM^ -- blam* of (ktdtoSi 


SS 1 ALL HANDICAP;,'IT (1 IB) ‘ N > 

SS 2: ALL HIR: OR ALL EMPLOY: OR ALL PLAC: (20704) 


SS 3: ALL ATTITUD: (30871 
SS 4: 1 AND 2 AND 3 (4| 


SS 6/C? 
USER: 
"PRT Tl 4' 


M**d*st u+vU* * 

oil fU*. 


_ « . \ . 'Ji t /N I 


Tl EMPLOYEE SERVICES A STUDENT PERSPECTIVE 


IBM CALLED EXCEPTION • DP INDUSTRY HIT FOR ATTITUDE 
ON HANDICAPPED 


NOT ALL ILLNESSES ARE HANDICAPS 


Tl TOTAL PERSON TRAINING 
SS 6 /C? 

USER: __^ 

'P’RT FULL 1 SKIP O 


AVfer 

I prMki 




PROG: 

2 

AM 

Tl 






77 05588 

IBM CALLED EXCEPTION DP INDUSTRY HIT FOR ATTITUDE 
ON HANDICAPPED 
WISEMAN, TONI 

COMPUTERWORLD (CMPWAB, COW), VII N14. P15. ISSN 0010 4641, 

APR. 4, 1977 . , r _ 

J (JOURNAL) j* ' ) 

6N0LISH 

ADDITIONS: AREAS; CASES; COMPANIES; COMPUTER PROGRAM 
MING; COMPUTERS: COSTS; DEAFNESS; DISABILITIES, EMPLOYERS; 
EXCEPTIONS, FIRMS; GOVERNMENT; HANDICAPPED; IBM ARMONK 
NY, INDUSTRIES; MANAGEMENT; MANUFACTURERS; NEGATIVE: 
NOISE; PROGRAMMERS: SOLUTIONS; USERS - /I \ 




1 -) 


WITH ONE EXCEPTION, THE DP INDUSTRY ■ BOTH USERS AND 
MANUFACTURERS HAS DONE VERY LITTLE IN THE AREA OF 
EMPLOYING THE HANDICAPPED. IBM ALONE HAS BEEN IN THE 
FOREFRONT' ALMOST FROM ITS INCEPTION AS AN EMPLOYER 
OF THE HANDICAPPED. IN THE CASE OF SOME COMPUTER COM¬ 
PANIES THERE HAS BEEN ALMOST A NEGATIVE REACTION. A 
FEELING OF 'I'M NOT GOING TO DO ANYTHING UNTIL THE 
GOVERNMENT FORCES ME TO.' IN MANY CASES. HOWEVER, IT 
IS THE DISABILITY WHICH MAKES THE HANDICAPPED PERSON 
SUITED TO A JOB. A DEAF PERSON, FOR INSTANCE, WAS THE 
IDEAL SOLUTION TO ONE COMPANY'S NOISE PROBLEM IN ITS 
BURSTING ROOM, THE OPERATOR WAS TRAINED TO DO THE 
JOB AND THE FIRM SAVED THE COST OF INSTALLING SOUNO 
PROOFING. DEAF PEOPLE ARE ALSO LESS DISTRACTED BY 
OTHER NOISES AND HAVE BEEN SHOWN TO HAVE A HIGHER 
PROGRAMMING OUTPUT THAN PROGRAMMERS WHOSE HEARING 
IS UNIMPAIRED. IN ADDITION, ACCORDING TO THE LAW, THE 
HANDICAPPED PERSON MUST ALSO BE HIRED IN THE MANAGE 
ME NT AREA. 
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Simple Techniques 

Provided 1= 

• DYNAMIC FULL SCREEN GRAPHICS 

• REALISTIC SOUND EFFECTS 

# 5 FAST FUN GAMES # 

1) LASER WARS—Zap alien saucers with a laser 
beam—for one player. 

2) RACING—You drive the speedster. If you 
reach the checkered flag,did you beat the high 
score? Every' game is different and you can 
customize the track for even ndore variety. 

3) WRAP—(requires Joysticks)—you’ll enjoy this 
fast paced game.One, two, or “three” players. 


17 years combined experience 
went into analysis, design, programming, 
testing, and documenting these games. 


SPKE-SPKERS 


TM 


Protect-Control-Organize 

Computer & Peripheral Equipment 
Helps prevent software “Glitches” 
and unexplained memory loss 


& 

~ * - 



-a PROTECTS against power 

line transients & filters 
1% X-V -XI out RFI "Hash” 

I CONTROLS with 8 indi- 

m, m, m, I vidually switched 120 vac 

grounded outlets. 2 separ¬ 
ate filtered circuits. 

Deluxe Power Console ORGANIZE your computer 

79.95 & peripheral equipment 

power cords individually 
or main on/off switch-fuse 
& indicator light. 

Also oraiJable in 2-socket waJJ mounted modeJs, 


All 3 games 


SPECIAL OFFER 

$9.95 cassette 
$13.95 disk 


California orders 
add 6% tax 


Send cash, check, or money order to 

Kemp Software, TI Games Group 
3292 Mission Blvd. 

San Diego, CA 92109 


MINI-I 

Transient absorber 

34.95 






ms® 


Colony Drive Ind. Perk 
6584 Ruch Rd„ DepL 99 
Bethlehem, PA 18017 


Electronics Co. Inc. 




Dealers Invited 
PA Res. add 6% 


MINI-II 

Transient absorber 

plus RFI "Hash” filtering 

44.95 


Order Factory Direct 

215-865-0006 

Out of state call toll free 

600-523-9685 


Cassette Compatibility At Last! 

If The TI-99/4 Will Not ___ 

Control Your Cassette a,= CIS%= z - 

Recorder Through 

Its Remote Jack, We Have The Solution For Y 



TM 


The TI-SETTE Adapter 

• Quickly connects between the black lead on the TI Dual Cassette 
Cable and your recorder’s remote jack to establish compatible 
polarity. 


• Low cost — Only $3.50 plus 75 cents postage & handling. 
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INNOVATIVE PRODUCTS 
FOR TMS9900-BASED 
PERSONAL COMPUTING 



P. O Box 5537, Eugene, Oregon 97405 


TI-SETTE 
is necessary for this 
program's proper 
cassette file operation if 
your recorder's remote 
lead doesn't work. 








































The.Home Secretary 


Computerized Filing 
and Telephone Dialing 



By Malladi V. Subbaiah 

Post-Doctoral Research Fellow 
Department of Mechanical Engineering 
301-46 CALTECH , Pasadena f CA91125 


N ow that you have a personal computer, you've proba¬ 
bly been looking for ways to use it around the house. 
When writing software for home applications, it’s often 
possible to create a genera! program that functions in a vari¬ 
ety of household situations. The program accompanying 
this article follows this design philosophy. With it, you can 
create a personal phone and address directory, time events 
(such as elapsed telephone connect time), have your com¬ 
puter dial or redial any number in your directory, and set 
up an inventory of household possessions for insurance and 
maintenance purposes. All this in standard 16K Tl BASIC 
—with some room to spare for customizing the program 
according to your preference. 


GENERAL DESCRIPTION OF THE PROGRAM 
Data Entry 

When the program is first RUN, the screen options give 
a user the choice of updating or using a previous data file 
saved on cassette or disk, or creating an entirely new data 
file for one of two options: (1) the phone and address di¬ 
rectory, or (2) the houshold inventory. Both of these op¬ 
tions also provide sub-options: For example, the program 
can draw on the data files to dial (by the dual-tone method) 
an appropriate phone number, sum the total cost in the in¬ 
ventory, and print hardcopy listings of each. The category 
names for the file organization are provided in the data 
statements 220 and 230. 

The input data is stored in the arrays Al$, A2$, A3$, 
A4$ and A5$. A dimension of 60 is assigned to each of the 
arrays, and a maximum string length of 190 characters is 
allowed for each complete entry. Line 710 checks the validi¬ 
ty of each data set. At this stage, the program also checks 
for dimension overflow and memory overflow (lines 480 
and 810), and appropriate warning messages are displayed. 
These protection features prevent accidentally keying in 
excess data—a situation that would result in an error and 
program termination. Additionally, the cost category (A2$) 
in option 2 is designed to accept only numerical input so 
that you can conveniently carry out numerical operations 
on the data—for example, the total cost of possessions. And 
keep in mind that you can, of course, change the categories 
by altering the data in lines 220 and 230. 


Sort Routine; 

An efficient sort subroutine is presented in the program 
at line 2410. The routine employs a tree sort procedure 
which needs approximately 2*N*(Log 2 N—1) comparisons 
to sort N entries. Since various versions of sorting routines 
have been previously published and are readily available 
[see for example, reference no. 2 at the end of this article, 
or any elementary book on numerical analysis], I won’t 
discuss the mathematical details of the sorting procedure. 
Here, the sorting is based on the entries in the arrays A1$ 
(i.e., names or items in the default categories). The remain¬ 
ing arrays are appropriately rearranged to be consistent 
with the original data. The procedure is carried out without 
the use of any intermediate arrays, thereby saving on the 
core usage. Complete sorting and rearranging of 50 entries 
takes about 4 minutes. 

Data Deletion and Alteration 

The subroutine at line 1010 updates any existing data 
set. You can access any particular entry by its serial number 
or by its name (or a segment of it). A search routine (line 
1790) retrieves the data set with the specified name, or the 
next higher one if the name match is not exact. As previous¬ 
ly described, validation of the altered data for allowable 
string length and memory overflow are carried out. At this 
stage, you have the option to move up or down in the list, 
search for a different entry, or finish the editing session. Any 
alteration of the entry title (i.e., A1$) causes the variable 
FLAG2 to be set equal to unity. This causes resorting of 
the data set before the directory can be displayed. 

Display of the Directory 

The program allows you to display the data directory in 
two formats. In the first format (at line 1420), a concise, 
quick-reference listing of the complete directory is provided. 
This includes name and phone number for the phonebook 
option, and item and cost for the inventory option. 

In the second format, you can display all the data con¬ 
tained in any single entry. Access to individual entries is 
either by its serial number in the directory, or by a string 
search as discussed in the previous section. 

Additionally, you can get a hardcopy listing of the entire 
directory (line 4280) through an RS232-compatible printer, 
or the Tl thermal printer. The screen printing routine at 
line 4150 was used to get a hardcopy print-out of screen 
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AC power line surges are destructive, can cost you 
money, and can’t be prevented. But you can stop 
them from reaching your sensitive electronic equip¬ 
ment with a Surge Sentry. 

Surge Sentry acts in picoseconds to dissipate up 
to a 1,000,000 W, 100/Lt second surge. Triggers at 
10% above nominal peak voltage. Works in parallel 
with the power line. Is easy to install for immediate 
protection. No complicated wiring or special tools 
required. 

Several different models to choose from, including 
an OEM version. Call or write today for a free brochure. 



8BRBE 

SBBGRV 


It’ll clean up your AC 



IglMUCS 

MIENTERPRMSES, INC. 

643 South 6th Street, San Jose, CA 95112 
(408) 288-5565 


DEALER INQUIRIES INVITED 


displays for this article. This portion (lines 4150-4260) can 
be deleted without affecting the operation of the program. 

Computerized Phone Dialing 

Now let's look at how we can get the T1-99/4 to do 
Touch Tone dialing. Since the telephone company prohibits 
direct connection of any unapproved (by the FCC) user 
equipment to the phone line, the method we will have to 
use involves proximity: Dialing of the phone is accomplished 
simply by placing the microphone of the phone handset in 
front of the monitor speaker, without any direct connec¬ 
tion to the phone lines. 

Briefly, the Touch Tone system of telephone dialing op¬ 
erates by sending a specific pair of audio frequency tones 
over the voice channel of the phone line for each digit. The 
switching circuits at the telephone facility decode the tones 
and operate the appropriate circuits to make the connec¬ 
tion. The tone pairs consist of a low frequency group (697 - 
941 Hz) and a high frequency group (1209 -1477 Hz) as 
shown in Figure 1. For example, to dial the number 5, we 
have to send the audio tones at 770 Hz and 1336 Hz simul¬ 
taneously for a sufficiently long time to be recognized by 
the switching circuits. Also, there should be a sufficient gap 
between digits to have’each digit registered individually. Al¬ 
though a 40 millisecond signal duration followed by a 40 
millisecond silence should theoretically be adequate, I ob¬ 
served that a 150-200 millisecond signal duration and a 
gap of about 100 -150 milliseconds is required for reliable 
operation with this system. 

With the CALL SOUND (duration, frequency 1, volume 
1, frequency 2, volume 2) command of Tl BASIC, the 
TI-99/4 can generate the dual tones of Figure 1. In doing 
this, however, an interesting problem arises: If we examine 
the monitor’s output on an oscilloscope, we can observe 
that the so called “pure tone” from the computer is, in 
fact, a square wave and is not a sine wave. By Fourier analy¬ 
sis, the square wave can be decomposed into its constituent 
sine waves. (Interested readers can refer to any elementary 
book of calculus for the details of the analysis.) To be spe¬ 
cific, the output from CALL SOUND (100, 500, 1) is a 
square wave of 500 Hz for a 100 millisecond duration at 
the volume level 1. This is a combination of sine waves at 
500 Hz, 1500 Hz, 2500 Hz and so on. This can pose a prob¬ 
lem when we try to dial the first two members (i.e., 697 Hz 
and 770 Hz) of the low frequency group. The third har¬ 
monics of these frequencies, namely, 2091 Hz and 2310 Hz, 
are also recognized by the switching circuits, resulting in 
the rejection of the signal. The third harmonics of 852 Hz 
and 941 Hz seem to be outside the frequency response of 
the switching circuits and pose no problem. 

There are several ways we can overcome this problem of 
dialing the digits 1 thru 6. One very simple and inexpensive 
way is to use a passive low-pass filter with a cut-off frequen¬ 
cy of about 1.5 KHz in the audio line to the monitor, there¬ 
by attenuating the higher frequencies. Figure 2 shows a 
block diagram for the installation. The circuit for the filter 
which I built for under five dollars is shown in Figure 3. 

HOW TO USE THE PROGRAM 
Initial Set-Up 

With a choice of N (for NO) for the LOAD DATA? op¬ 
tion in Display 1, the program has you select either the 
Phone Directory or Household Inventory option. (If your 
choice was Y, and you loaded a file, one of the data ele¬ 
ments on the file tells the program which option to branch 
to.) The data file is then keyed in, guided by the input 
prompts. The phone number can be entered with spaces 
and parentheses, if desired. The most recent entry can be re¬ 
entered by pressing R for the name (or item). You can termi¬ 
nate by pressing E or END; this causes the data to be sorted 
and returns you to the master selection list (Display 3). 
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Figure 1. Basic Frequencies for the Two-Tone System 

of Telephone Dialing 
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Figure 2. Schematic Layout of Filter Location 
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Figure 3. Circuit Diagram of the Filter 


Note; On many touch-tone phone systems this filter will not be 
needed for oorreet dialing. We suggest you first try without it—Ed. 


Load Previous Data File 

To load a previously stored data file, we select Y for the 

LOAD DATA? option and follow the screen displays to 
operate the cassette player or disk. When loaded, the name 
of the data file, its size and the date of the previous revision 
will be displayed (Display 2); the program will then return 
you to the master selection list (Display 3). 

Master Selection List and Its Functions 

The master selection list (Display 3) provides access to 
the program’s various options. A banner ***UPDATE 
DIRECTORY*** will be displayed if there has been any 
alteration of the data file since the last update. This should 
act as a constant reminder to save the revised version of the 
data on a cassette or disk. The different options of the 
master selection list are as follows: 

Press 1: Select this to add any new entry to the data file. 
This leads to the data entry of Display 1. 

Press 2: This leads to Display 4. You can access any 
individual entry by its serial number in the directory (from 
Display 5) or by a string search. Here, entering a null string 
(i.e., just pressing the ENTER key) for any category will 
leave it unaltered. 

Press 3: This displays a short form of the directory as in 
Display 5. The display stops when the screen is filled. Press¬ 
ing any key causes the remaining data to be displayed, or 


Our second Tl Games Package 

for your 99/4 

Eliza — Our version of the classic Artificial Intelligence 
program. Allows the computer to play psychotherapist. 
Responds to plain English input. 

Tl Poet — Turns your computer into a poet who writes a 
seemingly endless variety of poems on a given theme. We 
show you how to program your own poet. The possibilities 
are unlimited! 

ElectfO/l — A space age Black Box® . Electron rays are 
absorbed, reflected or deflected as you try to locate the 
invisible neutron target in a sealed chamber. 

All three for just 

$955-Tape (GT-02) $14^5-Disk (GD-02) 
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COMING SOON More software from Tlmore to transform 
your TI99/4 into the ultimate machine of the 80’s. Great 
graphics In Tl BASIC or super graphics for Tl Extended 
BASIC users. Do you have any special requests? Please 
let us know. We’re in business to serve the Tl user. Dealer 
inquiries welcome! 
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City; 


State/Zip, 


Make check or money order payable to; 


a i iviv/ 1 VL- Adrwsfonof 
P RODUCTS M-l-A Systems Corporation 

Dept. 99-1 • P.O. Box 1431 • Winter Park, Florida 32790 

99'er Magazine July /August 1981 45 


















Y 




P 


LOAD DATA? (Y/N) N 

PHONEBOOK? .(Y/N) Y 

enter’ ■ 

• E TO' EXIT 
R TO REENTER 
NAME ;DQE 
RHONE; 987 6543 
STREET:4321 NORTH SOUTH ST 
CITY & ZIP:~HOLLYWOOD; CA99888 
MISCfJOHN; DATE OF BIRTH JAN 
1 1921,*W|FE MARY; CHILDREN 
JQE.: SUSAN; WEDD ANN IV FEB 

26; «D 

DISPLAY 1 INITIAL SET-UP 


P 


P 

P 


Np#p; 

■ pressing ENTER, 
after the user's response 


P 


WHICH ONE; DOE 
ENTER 

NEW DATA AT CURSOR 
'D'TO DELETE THE ITEM 
'ENTER' FOR NO CHANGES 


P 


DOE? 

987 6543; (424) 987 6543 
4321 NORTH SOUTH ST? 
HOLLYWOOD; CA99888? 7) 

JOHN; DATE OF BIRTH JAN 1 19 
21; WIFE MARY; CHILDREN JOE 
$ SUSAN: WEDD ANNIV FEB 25;? —) 

DISPLAY 4 DATA ALTERATION 


DOE 

(424) 987 6543 
4321 NORTH SOUTH St 
HOLLYWOOD; CA99888' 

JOHN; DATE OF BIRTH JAN 1 19 
21; WIFE MARY; CHILDREN JOE 
$ SUSAN; WEDD ANNIV FEB 25; 

1(424) 98 7 6543 

P R ESS 

R TO REDIAL 
S TO START STOPWATCH 
N FOR NEW NUMBER 

PRESS ANY KEY TO CONTINUE 
PRESS 

R TO REDIAL 
S TO START STOPWATCH 
N FOR NEW NUMBER 
PRESS ANY KEY TO CONTINUE S 
HOLD DOWN 
R TO DIAL AGAIN 
ANY KEY TO CONTINUE 

00:55 

DISPLAY 7 PHONE DIALING AND 

STOPWATCH 
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✓V 


LOAD DATA (Y/N) _ 

ENTER 

1. CS1 

2. DISK 1 

3. OTHER 

* REWIND CASSETTE TAPE 
THEN PRESS ENTER 

* PRESS CASSETTE PLAY 
THEN PRESS ENTER 

INVENTORY - 1 

LS IZE{ 3800) = 1628 

LAST UPDATE: MARCH 26 81 

DISPLAY 2 LOAD PREVIOUS 

DATA FILE* 

(FOR OPTION 1) 


* DETJDN2; EN7EB EJLE NAME 
OPTION 3: ENTER DEVICE NAME 


CS1 

p 

CS1 

p 


JJ 


6 . 


ARPACI JOE 


321 1234 

DOE 

(424) 

987 6543 

DOE MARY 

(424) 

789 3456 

MOORE N. 

578 

657 8901 

NORTON P, 


356 4473 

OHSHIMA 


368 8714 

SASTRY M t 


765 2345 

SHIELD 8. 

654- 

-789 4532 

SHYAMALA 


206 6808 

SUBBAIAH 

(213) 

356 4473 

WONG V, 


256 3902 


PRESS ANY KEY TO CONTINUE 

DISPLAY 5 SHORT FORM 

DIRECTORY 


TOTAL COST OF ALL THE ITEMS 


* 

* 

$ 

» 7450.6 

% 

% 

* 


PRESS ANY KEY TO CONTINUE 

DISPLAYS TOTAL COST OF 

INVENTORY 


PRESS 

1 - TO ADD MORE DATA 

2 - TO ALTER THE DATA 

3- TO DISPLAY THE DIRECTORY 

4 — TO DISPLAY ONE ENTRY 

5 - TO USE THE DATA 

6 - TO STORE DATA FILE 

7 - FOR PRINTER LISTING 

8 - TO END PROGRAM 


* * * 


UPDATE DIRECTORY *** 


DISPLAY 3 MASTER SELECTION LIST 


/ 


P 


WHICH ONE? DOE 
DOE 
(424) 987 6543 
4321 NORTH SOUTH ST 
HOLLYWOOD; CA99888 
JOHN; DATE OF BIRTH JAN 1 19 
21; WIFE MARY; CHILDREN JOE 
& SUSAN; WEDD ANNIV FEB 25; 

PRESS 

E TO LIST UP 
X TO LIST DOWN 
S TO SEARCH MORE 

PRESS ANY KEY TO CONTINUE 

DISPLAY 6 SINGLE ITEM DISPLAY 


ENTER 1.CS1 

2. DSK1 

3. OTHER 

YOUR CHOICE? 

TODAY'S DATE: MARCH 7 1981 
DIR. NAME: PHONE BOOK — 1 

* REWIND CASSETTE TAPE 
THEN PRESS ENTER 

* PRESS CASSETTE RECORD 
THEN PRESS ENTER 

* PRESS CASSETTE STOP 
THEN PRESS ENTER 

DISPLAY 9 SAVE DATA FILE 


CS1 

P 

CS1 

p 

CS1 

p 




returns you to the master selection list if no more data is to 
be displayed. 

Press 4: This produces a complete listing of a single en¬ 
try (Display 6)—selectable by its serial number in the direc¬ 
tory, or by a string search as in Display 4. 

Press 5: This allows the program to use the data files 
when dialing/redialing in the phonebook option, or to 
obtain the total purchase cost of the inventory in the house¬ 
hold inventory option. If you are in the phonebook option, 
the program will advance to Display 6. If the display is ap¬ 
proved by pressing any key other than E, X and S, the com¬ 
puter dials the displayed phone number. In the beginning, 
you may have to adjust the volume control of your TV set 
or monitor for proper operation.The digits will be displayed 
one-by-one as they are dialed. If the total number of charac¬ 
ters in the phone number is greater than or equal to 10, the 
routine recognizes it as a long distance call, and dials 1 at 
the beginning (Display 7). After getting familiar with the 
operation, you may want to reduce the time periods assigned 
in the CALL SOUND statements on lines 3540, 3580, 3590. 
You can redial the number by pressing R, start the stop¬ 
watch by pressing S (and quickly releasing the key), or select 
a new number using the choice N. Any other key (including 
a prolonged pressing of S) terminates the dialing session and 
the master selection screen will be displayed. 

With the selection S, the stopwatch routine on line 3700 
is activated. The elapsed time is displayed at the lower 
right-hand corner (Display 7). You can control the accuracy 
of the stopwatch by adjusting the time delay constants of 
the DATA statement in line 3320. Here, holding down R 
starts the dialing procedure all over again; pressing any other 
key returns you to the master selection list (Display 3). 

If you are in the household inventory option, choice 5 
of the master selection list will cause the program to calcu¬ 
late the total purchase cost (Display 8) of all the items in 
the data file. There’s no adjustment here for inflation. This, 
however, could easily be done. For example, you could key 
in the consumer price index into the data file at the time of 
an item’s purchase and scale the purchase cost with the 
current price index when evaluating the SUM (in the routine 
on line 3150). I felt, however, that this procedure would be 
rather involved for day-to-day use. 


Press 6: This permits storing the data file on either cas¬ 
sette or disk. The computer asks (Display 9) for the title of 
the data file and the date of revision for future reference. 
This information will be displayed when you re-load the 
data for another session. 

Press 7: This produces a hardcopy listing (with nine 
complete entries per page) on either the Tl thermal printer, 
or a printer connected to the RS232 interface. The com¬ 
puter first asks you to verify that either the thermal printer 
or the RS232 interface is connected, to avoid the File-Error 
termination. As a precaution, alway SAVE the updated file 
on cassette or disk (option 6) prior to printing. 

SUMMARY AND FINAL REMARKS 

This program is capable of performing a wide variety of 
functions. I have shown you how to use it to maintain a 
computerized phone directory and do automatic dialing, as 
well as to maintain very flexible data files for day-to-day 
use in the home. Typical applications include an inventory 
of household valuables, a record of credit cards and bank 
accounts, lists of author/subject references for research, 
recipe card files, etc. Some of the individual subroutines 
(in particular, the sorting routine and the stopwatch routine) 
should also be useful in many other applications. The pro¬ 
gram, as presented here, is contained within the standard 
16K Tl BASIC. A version in Extended BASIC to access the 
additional 32K RAM should give the program an even 
broader scope. 
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lOO REM ********************** 

110 REM * THE HOME SECRETARY * 

120 REM *********** ********** Jt 
130 REM 99'ER VERSION 7.01.1 
140 REM BY MALLAD1 SUBBAIAH 
150 REM 
160 REM 

170 DIM Al*<60>,A2«(60).A3*<601,A4$<60),A5*C60) 
ISO DIM CAT*(6) 

190 DIM FI(3),P2(3) 

200 DATA 697.770,852,1210,1340,1401 

210 READ PI <1 ) , Pi (25 , Fl (3) , F2 (1 > , F2 (2) . P2 (3) 

220 DATA NAME: , PHONE: , STREET: , Cl TYVZ IP: , MI SC r 
230 DATA "ITEM: “,COST:,SHOP:■WHEN:,MISCi 

240 CALL CLEAR 
250 LSIZE=0 
260 OPT=1 

270 READ CAT*(1),CAT*(2), CAT*(3).CAT*(4),CAT*(5) 

280 PRINT "LOAD DATA? (Y/N)' 1 

290 GOSUB 3120 

300 IF KEY<>89 THEN 330 

310 GOSUB 1900 

320 GOTO 410 

330 REM NEW SET UP 

340 PRINT "PHONE BOOK? <Y/N)" 

350 GOSUB 3120 

360 IF KEY=89 THEN 390 

370 OPT=2 

3SO READ CAT*<1),CAT*(2),CAT*(3),CAT*(4).CAT*(5) 

390 N=0 

400 GOSUB 430 

410 GOSUB 850 

420 GOTO 410 

430 REM KEY INPUT FOR DATA SET UP 
440 PRINT : “ ENTER'*:" E TO 

EXIT. R TO REENTER" 

450 FLAG1=1 


460 FLAG2=1 
470 I=N+1 

480 IF I<=60 THEN 520 

490 PRINT : :*** ARRAY FULL (N=60) ***" : : 

500 GOSUB 3100 
510 RETURN 
520 PRINT 

530 INPUT CAT*(1):Al*tl) 

540 IF Al* (I) ='*E"THEN 750 
550 IF Al*(1)="END"THEN 750 
560 IF Al * 11 ) =•’ "THEN 530 
570 IF A1*(I)< >“R"THEN 620 
580 1=1-1 
590 N=I-1 

600 PRINT s " * * * REENTER LAST SET ***** 

610 GOTO 520 

620 IF OPT< > 1 THEN 650 

630 INPUT CAT*t2>:A2*<I) 

640 GOTO 670 

650 INPUT CAT *(2):T 

660 A2*<I)=STR*(T> 

670 INPUT CAT*(3):A3*(I) 

6BO INPUT CAT*(4)sA4*(I) 

690 INPUT CAT*(5)tA5*<I) 

700 GOSUB 770 

710 IF T>190 THEN 600 

720 GOSUB 800 

730 N=I 

740 GOTO 470 

750 GOSUB 241O' 

760 RETURN 

770 REM MEMORY CHECK 

780 T=LEN (Al* < I ) &A2* < I ) &A3* < I ) StA4* (I >StA5* ( I ) ) 

790 RETURN 

800 LSIZE=LSIZE+T 

810 IF LSIZE<3300 THEN 840 

Continued on p. 70 
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I went to Chicago not knowing quite what I’d find . , . 
Speculation in the microcomputer community had been 
running rampant: Would Texas Instruments introduce 
a new personal computer at the summer Consumer Electro¬ 
nics Show? What would it be like? What would it cost? 

During the month prior to the May 31st-June 3rd event, 
rumors rippled throughout the trade press, computer dealer 
network, and users-group grapevine. According to a host of 
“reliable sources,” Tl would both release and not release a 
new machine at this time. If one believed the former group 
of reliable sources, the new machine would bridge both the 
lower gap between Tl’s programmable calculators and the 
TI-99/4, as well as the upper gap between T1-99/4 and the 
990-series of business computers. That seemed like quite a 
bridge to me, although where the bridge was actually lo¬ 
cated depended on which group of reliable sources one 
believed was more reliable . . .The cost of this phantom 
machine would, I was reliably informed, be both significant¬ 
ly less and significantly more than the price of a TI-99/4. I 
guessed that was because, accord ing to more reliable sources, 
it would be "bare-boned” as well as “fully loaded.” Quite 
versatile this existing/non-existent machine! 

The stage was set for its—if it existed—Chicago debut 
Well, it does indeed exist: Enter the TI-99/4A personal 
computer—a new console that retains the same profile, 
speech capability, color graphics and software compatibility 
of its predecessor, but replaces the old 40-key calculator- 
style keyboard with a standard-configuration, 48-key type¬ 
writer keyboard. This, in itself, would be quite a welcome 
improvement; but take a closer look at the new keyboard’s 
specifications and you'll soon discover that it really is a. new 
keyboard and not just the recipient of some superficial cos¬ 
metic changes. Witness its impressive array of features: such 
niceties as both upper and lowercase; an ALPHA LOCK key 
(for conveniently keeping the keyboard in uppercase mode); 
auto repeat (with a two second time delay) on all keys; 
function (FCT'N) and control (CRTL) keys (for secondary 
functions and telecommunications use); and finally, a 
BASIC that will accept both upper and lowercase characters 
but displays all reserved words, variable names, and subpro¬ 
gram names in capitals for easy identification. How’s that 
for versatility? 

The keyboard action has an excellent "feel.” Although it 
is still the same small size as its predecessor, touch typing 
on this new keyboard gives you the illusion of typing on 
a big office machine. It seemed quite capable of keeping up 
with my occasional blinding bursts of speed—something the 
old keyboard (and quite a few other microcomputer key¬ 
boards as well) is incapable of doing. Incidentally, I have 
been informed by Texas Instruments that since the circuit 
board has been re-designed, there’s no practical way of 
retrofitting existing TI-99/4s with the new keyboard. 

In addition to the features I’ve mentioned above, there 
have been some other changes. As you can see from the 
photograph, don’t expect the familiar keyboard overlays to 
fit this new machine. Instead, it uses a two-level strip over¬ 
lay mounted above the top row of keys (similar to super- 
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demonstrations of the Tl LOGO language, TEXNET database access with 


market shelf pricing strips and holders). Also, due to some ROM/GR 
swaps on the new circuit board, the console now has a built-in "tra 
circuit (that has to be installed in the old console through a sepan 
factory modification) for TMS9900 assembly language debugging 
the UCSD Pascal Development System (see 99’er Magazine, May/Jd 
1981, p. 56); in the process, however, the console lost its Equation d 
culator mode. 

Even with all these changes described so far, I’ve yet to mention ! 
most exciting feature of the new console: its remarkably low price; 
suggested retail price of $525 sure buys a lot of features in this packa 
The bottom line is that Tl's new machine is less than half the price 
anything from another manufacturer that even comes close to its pov 
and versatility. (There presently isn’t any other micro on the marl 
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LECTRONICS SHOW 




By Gary M. Kaplan 
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ith typewriter-like keyboard and new low price. Other show highlights included 
i-speech, and a VCR controller (shown above, to left of disk drive). 


that offers the capability of combining color graphics, sound, speech, 
sprites, and music in the same program!) I strongly suspect that very 
shortly we will be welcoming a large number of new users into our 
99’er community . .. 


\ T1 LOGO & TEXNET sm 

j The new console wasn’t the only Tl product to attract crowds of 
“ show-goers. Tl LOGO, a new programming language, and TEXNET, an 
on-line computer information and communication service for the Tl 
Home Computer [see related articles in this and the previous issue] 
captured the interest and imagination of all who passed the exhibit and 


took the time to look at the colorful sprite animation on 
the video monitors and listen to the latest UPI presswire 
news “voiced” through the speech synthesizer. A proto¬ 
type of Tl’s Terminal Emulator II provided the text-to- 
speech translation of the UPI database material that was 
being sent over the telephone from The Source SM in 
McLean, Virginia, and also provided access to the TEXNET 
portion (a subset of The Source) for viewing pictures from 
the 77 Graphics Library and hearing scores from the Ti 
Music & Sound Library. Subscribers to TEXNET will be 
able to download any items in these libraries for use in their 
own programs. 


Tl Video Controller 

Besides the numerous TI-99/4A consoles that were hard 
at work demonstrating new software at various locations 
throughout the exhibit area, Texas Instruments also had 
another piece of new hardware earning its keep—although, 
this one, the 77 Video Controller, was not being presented 
as a consumer item. Rather, it was part of an interactive 
point-of-sales display in which a videotaped Bill Cosby 
joked with the passers-by as he asked and answered ques¬ 
tions about the Tl product line according to typed in key¬ 
board responses. Tl will be positioning the Video Controller 
system for sale in the institutional market—it’s a particular¬ 
ly attractive package for schools and developers of corpo¬ 
rate training programs. 

The Video Controller (packaged in the familiar silver and 
black peripheral box of theTI-99/4 product line) is designed 
to work with industrial-grade video recorders having the 
ability to accept a remote control unit; it may be used with 
both j4-inch and /4-inch video cassette recorders, as weli as a 
video disk player. With it, the Tl computer can automatical¬ 
ly direct a tape or disk to predetermined segments of the 
video program (under Extended BASIC control). The result 
is a video system for developing and delivering customized 
teaching or training programs—a perfect marriage between 
the interactive and immediate feedback capabilities of the 
computer and the realism of video. 

With the Video Controller (about $700) and the Author¬ 
ing Software package (about $200) hooked into a TI-99/4A 
disk system with Extended BASIC, an author can design or 
update courses using existing videotapes (without altering 
the original tape), or design new video courses that take 
maximum advantage of the computer’s branching capabili¬ 
ties. The Author program is designed to eliminate the need 
for computer programming in developing a course, by guid¬ 
ing the development with step-by-step instructions on the 
display. Adding the text-to-speech capabilities of the 
Terminal Emulator II and Solid State Speech Synthesizer, 
will allow a developer to utilize virtually unlimited vocabu¬ 
lary to instruct a student taking the course. And since it’s 
possible to store the resulting interactive AV course on the 
second audio track of the videotape, there is no need for 

Continued on p. 56 
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Finally, 

Development Software 


SOFTWARE 

for 


For TM990 Micro Modules I ^Extended BASIC ^ 


PDOS/EXPRES is a powerful multi-user, multi-tasking 
operating system developed by Eyring Research Institute, 
Inc., for the 16-bit Texas Instruments TM990 micro¬ 
processor module family. This development software is 
designed for scientific, educational, industrial, and busi¬ 
ness applications where maximum configuration flexibility 
and tai ored program development are important. The 
PDOS/EXPRES system software combines TPs micro¬ 
computer hardware technology with a proven high per¬ 
formance operating system enhanced by a powerful 
EXPRES BASIC interpreter. PDOS/EXPRES can be easily 
configured for large or small floppy disks, bubble memory, 
and/or Winchester §lisk mass storage units. 

PDOS/EXPRES is available for either an EPROM based 
system or a RAM based system. A handsome 250 page 
Operator Reference Manual walks you through the fea¬ 
tures and use. PDOS/EXPRES is attractively priced at 
$1500.00*, or for evaluation purposes, you may purchase 
the Operator Manual for $25.00. 

Order your PDOS/EXPRES software from Eyring Research 
Institute, Inc. For further information and a free color 
brochure write or call Eyring Research Institute, Inc., 
Software Marketing Dept., 1455 West 820 North, Provo, 
Utah 84601, phone (801) 375-2434. 


Part 


□ ER3232 

□ ER3314 


□ ER3318 

□ ER3389 


□ ER3410/11 

□ ER3410/M 


Description 
32K Memory Board 

Winchester Controller Board 
Interface 

Color Video Display Board 

University Color Video 
Display Board 

PDOS/EXPRES Software 

PDOS/EXPRES Reference Manual 


I would like to have further information about the above 
items. Please send to: 

Name_ 


Date 


Company/University, 

Address_ 

City/State/Zip_ 


U.S. price 


Eyring Research Institute, Inc. 
1455 West 820 North 
Provo, Utah 84601 
(801) 375-2434 


Extended Baseball — Full sprite action, dual 
joystick control, see Extended BASIC in action 
(joysticks required). 

Extended Hangman — With speech, 580 words, 
good graphics (requires speech synthesizer). 

Extended BASIC Module Required For Both Programs 

CASSETTE : $9.95/Both for $16.95 
DISKETTE : $12.95/Both for $19.95 

• Satisfaction Guaranteed • 

Send Check To : 

Extended Software Co. 

11987 Cedarcreek Dr. 

Cincinnati, Ohio 45240 
Tel. (513) 825-6645 

Or Send 25 cents Postage for Literature 


. --1 ■■ 


SF 


m. 




'• '■‘C. 

■ *■■■■ 

■ 



for the TI-99/4 

Accounts Receivable.$ 99.95 

h 

Accounts Payable. 99.95 

Inventory. 99.95 

General Ledger. 99.95 

Package (All 4 Systems) .... $350.00 

Extended BASIC 

Inventory - Invoice.$129.95 

Payroll.$129.95 

• Disk-Based, 1 or More Drives 
•Supports RS-232 

•Full Documentation 

For More Information Contact: 

W. R. Wilson Co. 

928 North Apple St. 
Greenfield, IN 46140 
Tel. (317)462-1099 
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BOMBS 


A 




i 



i 


i 


Y 


i 


(UNIVERSITY BASIC Style) 



The ER3389 VDP Video Display Processor Board shown connected to the 
Texas Instruments TM990/189 University Module. 


By Paul R. Roper 
& Richard T. Adams 

By ring Research Institute, Inc. 
1455 West 820 North 
Provo, Utah 84601 


B OMBS AWAY is an interactive 
game for the Texas Instrument’s 
TM990/189 University Board with 
a TMS9918 Color Video Display Proc¬ 
essor (VDP) board attached. The game 
is written in University BASIC and takes 
advantage of all the color graphic com¬ 
mands included in the language. This is 
especially true of the MOVE command 
which moves and reflects SPRITE images 
at different speeds, whether or not a 
BASIC program is running. 

Interactive inputs from either a joy¬ 
stick or the user keyboard control the 
altitude and speed of the airplane. 
Bombs are dropped from the plane on 
three moving targets: a fighter plane, a 
boat, and a submarine. When bombs 
are not falling, the fighter plane is trying 
to shoot down the bomber plane. Also, 
the boat is bobbing up and down on the 
whitecapped water, and the submarine 
is diving and surfacing continually. 

Points are scored for each hit depend¬ 
ing on the plane’s altitude and the target 


hit. Points are deducted for each bomb 
dropped and each hit inflicted by the 
fighter plane. A running high score is 
maintained by the program and displayed 
at the end of the game. 


MOVE Command 

The key to the simulation is the 
MOVE command of University BASIC. 
This versatile command allows sprite 
movement to be done by the University 
BASIC system clock without program 
control. The MOVE command generates 
specific BASIC variables for monitoring 
and altering the sprite positions in real 
time. The X and Y delta velocities and 
automatic reflection limits can also be 
set for each sprite image. 

In this program, five sprite images are 
set in motion by the MOVE command. 
(Up to 32 sprites can be simultaneously 
set in motion.) The main loop of the 
program monitors the sprite positions, 
initiates new sprites, and watches for 
sprite coincidence. If the BASIC pro¬ 
gram had to move each sprite individual¬ 
ly, the smooth and fast responses would 
be impossible. 

If the MOVE command has only one 
argument, a table is generated to hold 


sprite positions, increments, and limits. 
Corresponding variables are also added 
to the symbol table of the BASIC inter¬ 
preter. The variables begin with the let¬ 
ters X and Y followed by the sprite 
number. For example, MOVE 5 creates 
ten BASIC variables: XI, Y1, X2, Y2, 
X3, Y3, X4, Y4, X5, and Y5. These are 
continuously updated by University 
BASIC to the current position of the 
corresponding sprite-even while BASIC 
is in keyboard mode. The variables can 
be read or changed at any time by a 
BASIC program, and the system will use 
the new values. Bombs Away uses these 
variables to check when to change the 
sprite patterns as the planes fly back 
and forth. They are also used to deter¬ 
mine which sprites caused the coinci¬ 
dence flag (variable CF) to be set. 

Sprites are set in motion by the 
MOVE command when the sprite num¬ 
ber is followed by the delta X and Y 
velocities. These velocities are the 
amount added to a sprite sum or posi¬ 
tion by each clock increment. The sprite 
is moved according to the sum divided 
by 256. Hence, if the delta movement 
were 2, then 128 clocks would be re¬ 
quired to move the sprite 1 pixel or 
screen position. For example, MOVE 1, 
256,512 would move sprite #1 one 
pixel in the X axis and two in the Y axis 
for every clock increment. As was stated, 
the clock runs independent of any 
BASIC program. The boat and subma¬ 
rine are given both X and Y velocities 
while the planes have only X movements. 

If the sprite is already moving and 
a new positive delta velocity is given, 
then the sprite will continue to move in 
the same direction with the new delta 
velocity. If the new delta velocity is 
negative, then the sprite will begin to 
move in the opposite direction with the 
new absolute delta velocity, reflecting 
the sprite. Hence, in order to direct a 
moving sprite in a specific direction, the 
sprite must first be stopped, and then 
given the signed delta velocity. For ex¬ 
ample, MOVE 1,0,DY;1,—DX,DYwill 
set sprite #1 in a right to left motion 
from the current position and leave Y 
unaffected. 

The reflection limits are specified 
with a negative first argument followed 
by the X and Y limits. These limits are 
generated by multiplying the lower limit 
by 256 and adding the higher limit. The 
lower limit should be less than the up¬ 
per limit. The X limit ranges from 0 to 
255 while the Y limit ranges from 0 to 
192. (Since University BASIC is an 
integer BASIC and numbers range from 
—32768 to 32767, these limits may be 
negative.) For example, MOVE -3,230, 
—30580 will reflect on the X axis be¬ 
tween 0 and 230 (0*256+230=230). 
The Y axis reflects between 136 and 
140 (136*256+140=34956). However, 
this number is greater than 32768 and 
hence 65536 must be subtracted from it 
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giving —30580. The effect of the boat 
bobbing up and down on the water and 
the submarine diving and surfacing is 
achieved by setting small Y reflection 
limits. 

Hardware 

The game is played interactively with 
the keyboard, or it can be made more 
enjoyable by attaching joysticks having 
a "fire” button. Line 5 of the program 
selects a joystick. It must be deleted 
when only the keyboard is to be used. 

The color VDP board is manufac¬ 
tured by Eyring Research Institute Inc., 
Provo, Utah. It attaches directly to ad¬ 
dress bus connector P4 of the University 
Board and has composite video output. 
A joystick interface is also provided on 
the board. The JOY function makes 
an assembly language call to hex address 
>1002. A listing of the routine is given 
in Figure 2. 


The Game 

Now, a little about the game. You 
have 25 bombs and start with 500 
points. Ten points are deducted for each 
bomb dropped and fifty points for each 
time you’re hit by the fighter plane. A 
submarine hit by a high altitude scores 
the maximum number of points. 

Sprite patterns are defined as follows: 

0 = Plane moving right 

1 = Plane moving left 

2 = Boat 

3 = Submarine 

4 = Bomb 

5 = Explosion 

6 = Fighter shell 

Two fixed patterns are also used to 
set up the water and the whitecaps. 
These are defined as follows: 

7 = Whitecaps on water 

8 = Water 


The actual sprites are assigned pat¬ 
terns and colors according to their posi¬ 
tion on the screen. The sprite object and 
color assignments are: 


1 = Plane 

2 = Fighter plane 

3 = Boat 

4 - Submarine 

5 = Bomb or Fighter Shells 


White 

Light Green 
Dark Blue 
Red 
Green 


If only the keyboard is used, then 
line 5 of the program should be deleted. 
(Type 5 followed by a carriage return.) 
Then the following keyboard characters 
control the speed and altitude of the 
plane: 

I = Drop bomb 
J = Slow plane’s velocity 
H = Increase plane’s velocity 
N = Increase plane’s altitude 
D = Lower plane’s altitude 


Figure 1. Program Listing 


5 SP=1 

10 MODE -15-251.-U N=5Q0: NB=25: PS=100: GOSUB 200 
12 SPRITE Qi‘0010838FFE031020000811FD7FIOOS040013133CDB7E3C" 

14 SPRITE 31' 1808083C7EFF7EX002S1£>38383819Q07E31BDA5A5BD817ES0" 

16 PATTERN 7."0000000000102307*: COLOR -240s VDP(960)=240= VDP(961)=5 
20 FOR 1=576 TO 767 
22 VDP<11=7+1/608 
24 NEXT I 

30 MOVE 55-1,230,0!-2,230.0;-3.230,-30530;-4,230,-25666;-5,230,191 

40 SPRITE -2,0,25-3,2,45-4,3,6 

42 MOVE 2,130,053,80,3054,120,50: Y2=110: GOSUB 250 

44 PRINT »9?;NB H "gll9iN” IF CF: GOTO 44 

46 IF NB<0: GOTO 300 

50 IF XK10: fiD=I 

52 IF Kl>220: BD=-1 

54 SPRITE -Mt-BDl/2,15: IF X2<10: SPRITE -2,0 
56 IF X2>220: SPRITE -2,1 
60 GOSUB 200 


Line Nos. 

5 

10-24 

30 

40 

42 

44 

46 

300-304 

50-66 

68 

70 

72-82 
90-98 
100-114 
200-212 
250 


Program Description 

Keyboard or Joystick variable. 

SPR ITEs, PATTERNS, and screen initialization. 
SPRITE MOVE limits, 

SPRITE assignments, 

SPRITE velocities and coordinates. 

Print score & wait for non-coincidence. 

End of game check. 

End of game. 

Set plane position & sprite assignment. 

Fighter plane gun fire. 

Plane hit by bomb. 

Bomb drop. 

Accelerate bomb and check for hit. 

Explosion! 

Plane speed and altitude inputs. 

Disable bomb. 


62 IF *3: fi=5 
64 IF AM 15: 6=115 

66 Y1=A! MOVE 1,0,051,PS*BD,0: IF B: GOTO 90 

68 IF Y5<Yl: X5=X2+10: Y5=Y2-4: SPRITE -5,6,15: ROVE 5,0,055,RND 500-250,-500 
70 IF CF: P=l: N=N-50: GOTO 100 
72 IF J2=0: GOTO 50 

30 B=50: BX=PS*BD: X5=Xls Y5=Y1+16: MOVE 5,0,0;5,BX,B 
82.Y=Y5: SPRUE -5,4,2: N=N-10: NB=NB-1: GOTO 44 
90 IF Y>Y5: GOTO 42 
92 IF Y5M30: 8=100: IF >J2: GOTO SO 

94 Y=Y5: B=B+75: BX=BX-BX/5: MOVE 5.ABS BX.B: IF CF=0: GOTO 50 
96 P=l: IF Y5>95: P=Y5/32-l 
98 N=N+P#30-A/I0 
100 MOVE P,0,Q: GOSUB 250 
' 102 FOR 1=1 TO 16 
104 FOR >1 TO RND 4 
106 COLOR I: TONE J,I 
103 NEXT J 
110 SPRITE -P,5,I 
112 NEXT I 
114 GOTO 40 

200 IF SP: P$=JQY 0: A=JGY 1/4-20: J2=JQY 2/200: RETURN 
202 J2=0: I=KEY 0: IF 1=73: J2=l 
204 IF 1=74: PS=PS-25 
206 IF 1=72: PS=P$+50 
208 IF 1=78: A=A-5 
210 IF 1=68: A=A+5 
212 RETURN 

250 8=0: MOVE 5,0,0: SPRITE 5,99,2405-5,4: Y5=0: RETURN 
300 IF ©Hi: HI=N 

302 PRINT @99*GAME OVER"6298"HI ="HI: IF KEY 0: GOTO 10 
304 GOTO 302 


Note for Figure 2. 

[This software routine must either be burned 
Into EPROM and plugged Into one of the 
vacant sockets on the Eyring board, or loaded 
into external, off-board RAM. Watch next 
issue for a discussion of addingthls additional 
: RAM to tint University Board—Ed,] 

■.. I J—m-:.. 


Figure 2. Joystick Software 


1 QOOQ'IOOO 


ACflC >1000 


2 1000: 1000 


NGP 


3 1002: 1004 


JHP J0YFF 


4 U1004: 0000 


data mm 

iCONTROL 

5 U1006: 0000 


DATA PftGHl 

5 SLOT 

6 U1Q0S: 0000 


DATA PflGtt2 

iBREAKOUT 

7 U100A: 0000 


DATA PRGM3 

! BOMBS 

3 

t 



9 

m ■ ■ i m 

10 

t 

JOY FUNCTION 


11 

+ 



12 100C: 04C0 

J0YFF 

CLK K0 

J CLEAR RESULT 

13 100E: 0061 103C 


piovb ejoYTBtn.Ri 

14 1012: I10E 


■JLT JCYF6 

!SWITCH 

15 1014: 0300 0000 


L1MI 0 

SDISABLE CLOCK 

16 1013: 04E0 1301 


CLR 8J0YW 

5START CONVERSION 

17 101C: 6020 003A 


3 6J0YB.R0 

iSUBTRACT BIAS 

18 1020: 0202 2305 


LI R2.J0YR 

5GET JOYSTICK ADDRESS 

19 

* 



29 1024: 0580 

JQYF2 

INC R0 

:COUNT LENGTH CF 1 SHOT 

21 1026: 3052 


SZCB »R2.R1 

5WAIT TO GO 1 

22 1028: 16FD 


JNE -J0YF2 


23 

# 



24 102A: 0300 0001 

J0YF4 

UMI IMSK 

1 ENABLE INTERRUPTS AGAIN 

25 102£: 045B 


RT 

:RETURN 

26 

i 



27 1030: D020 0032 

JCYFt 

IK3VB SJOYD.RO 

:G£T SWITCH READ 

28 1034: 3001 


S2C3 R1.R0 

;nask 

29 1036: 7800 0082 


SB RO.ejOYP 

5 REMOVE 

30 103A: 0453 

■ 

RT 


- i 

32 10-3C: 0102 FB00 

JOYTfi 

BYTE XU , >02, ; 

,FB 

33 103F: 0810 BF00 


BYTE >08,M0,>DF 
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By W.K, Balthrop & G.R. Michaels 


S implify your life . . .’’An extremely 
pleasant thought, isn’t it? At least 
that’s what one of America’s large 
insurance companies is betting on. Their 
multi-million dollar TV ad campaign 
boldly asserts that its policy coverage 
will, in fact, simplify your life,—make 
the financial and protection aspects of 
life seem easier, less complicated , .. 

These series of ads started us thinking: 
A personal computer is supposed to sim¬ 
plify our lives. But does it really? Many 
times, the new computerized methods 
that replace the old manual methods are 
still cumbersome; we’ve somehow traded 
in slow and tedius methods—but usable, 
nevertheless, because they’re exactly the 
way we feel comfortable doing things— 
for faster, more organized, but noticea¬ 
bly awkward mechanized methods. 
Most of the time this is because of the 
constraints imposed on the software 
through its dependence upon an overly 
complicated “man-machine” interaction 
via a keyboard. In a nutshell, we are 
forced to conform to an unnatural way 
of entering data. 

Think how much easier our “life with 
computers” would be if we could simpli¬ 
fy this interaction . . . Readers of 99'er 
Magazine are already familiar with the 
giant strides taken by Texas Instruments 
in the area of information output— 
specifically voice synthesis and text-to- 
speech. An efficient, moderately priced 
system of voice recognition for data 
input, however, still seems somewhat far 
away at present. 

Even though we have to forego voice 
input at present, there are still other 
methods for communicating with a 
computer that are more natural than 
through a keyboard. Take for example, 
the data tablet/digitizer—an input device 


that converts graphic, tabular, or menu- 
type information into digital values 
usable by a computer. By merely touch¬ 
ing a pen-like stylus to any position on a 
map, diagram, chart, menu, or other 
graphic presentation resting on the tab¬ 
let’s surface, the coordinates of that 
position are transformed into their digi¬ 
tal equivalents, and are sent back to 
your computer where the appropriate 
software converts the data into mean¬ 
ingful information input. For more ac¬ 
curate positioning on the tablet's sur¬ 
face, digitizers use a cursor with a cross¬ 
hair sight and “fire” button. 

What can you use a digitizer for? 
Applications are as unlimited as your 
imagination. For starters, how about 
order entry, opinion sampling, or menu 
selection? Checking an appropriate box 
on a pre-printed form inputs the data 
quickly and with less chance for errors. 

In the field of education—especially 
computer-assisted instruction—a digitizer 
can eliminate the tedium of typing and 
enhance the excitement of learning 
through more natural interaction. 

In design and drafting work a digitizer 
is a natural: Structural elements, floor 
plans, piping diagrams, printed circuit 
board layouts, mechanical parts—virtual¬ 
ly every type of graphic information 
you can trace—can be more efficiently 
input with this device. 

Typical uses in business and industry 
include forecasting and planning applica¬ 
tions, trend and comparative financial 
analysis, sales performance, inventory 
control, and stock/commodity charting. 

The medical field, too, can benefit 
from simplified data entry with a digiti¬ 
zer. Whether in lab or clinic you’ll find 
plenty of possible uses—applications 
such as x-ray and ultrasound planning 


and analysis 
And by 
games and 
digitizer is 
to joysticks 
possibilities 
tions. The 
goes on and 


, and lab report data entry, 
all means, let’s not forget 
computer graphics. Since a 
a more precise alternative 
and light pens, think of the 
for fast, interractive si mu la- 
list of possible applications 
on .. . 


The potential uses for a digitizer are 
indeed impressive, but we were wonder¬ 
ing how easy it would be to interface 
one to a personal computer such as the 
TI-99/4, and make it “do its tricks.” 
For our testing and software develop¬ 
ment we selected the Houston Instru¬ 
ment HI PAD—one of the popular digiti¬ 
zers designed for personal computers. In 
a series of articles we will report our 
progress in integrating this peripheral 
into our 9900-based family. 

. The HI PAD comes completely as¬ 
sembled with its own power supply and 
with built-in RS-232C and parallel in¬ 
terfaces. It has a digitizing area of 11x11 
inches, a resolution of 0.005 inches or 
.01 inches (with scaling in English or 
metric units), and has an accuracy of 
± 0.015 inches (at high resolution) in re¬ 
lationship to a user-defined origin. The 
coordinate system is absolute Cartesian 
with a choice of relocatable or fixed 
origin. In addition to RESET, there are 
three operating modes: (1) POINT, (2) 
SWITCH STREAM, and (3) STREAM. 

Three user formats are available: (1) 
parallel binary, (2) parallel BCD (binary 
coded decimal), and (3) serial ASCII 
(with selectable BAUD rates of 300, 
1200, 2400, and 4800), The digitizing 
rate, defined as the number of coordi¬ 
nate pairs per second (with a maximum 
of 100 in the HI PAD), is controlled 
and/or limited by the selection of out- 
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0, indicates the first coordinate of a switched stream, * i 

1, indicates successive coordinates of a switch idstream, 

2, indicates a coordinate of point mari^ " , , / \ ■ * * 

3, indicates a coordinate of stream mode with the^cursar 

button released. . •< ■ 

" ; ^ j- * .. ■■■ 4 ^ \ 

4, indicates a coordinate of stream modewiththb cursbrl 

button depressed. . v 

an ASCII coded + or —; ' . . \ *** 

ASCII coded digits0 - 9. • ? C • •: • : 

■ ■ . . w. S s £ 

ASCII coded carriage return. * - ; i \ ■?. 4 1 "' *• 4 s '• 

ASCI I coded line feed, 1 ‘ ’ 


1 


% 

>& 


& 


put formats. The serial format happens 
to be the slowest, but for reasons of 
simplicity in interfacing, we chose it for 
our initial tests. To try out the POINT 
mode, all that was necessary was to wire 
up a cable (not supplied) with a male 
DB-25 connector going to the Texas 
Instruments RS-232 Interface, and a 
female DB-25 going to the HI PAD as 
indicated in Figure 1. In Figure 2 you’ll 
find the serial format for the 15 ASCII 
coded characters. 


The Programs 

HI PAD DECODER is a short T! Ex¬ 
tended BASIC routine to display the 
15-character strings of serial data on the 
monitor or TV screen. Line 170 OPENs 
the RS-232 on port 2 (for 4800 BAUD 
and 8 data bits) to receive the 15-char¬ 
acter ASCI I string. The -128 at the end 
of line 210 is necessary for proper trans¬ 
lation of the 8-bit codes to 7-bit ASCII 
codes for correct alphanumeric screen 




display (see 99’er Magazine , May/June 
1981 issue, p. 22). This translation does, 
however, slow down both this program 
and the one that follows. 

HI PAD DEMO, with the interface 
connections as described above, is an 
Extended BASIC program that will 
allow you to calibrate the digitizer, and 
then calculate distance and total en¬ 
closed area for the POINT mode of op¬ 
eration. In forthcoming articles we’ll ex¬ 
plore other modes and applications. 


ICO REM MX*************XX 

110 REM * HI PAD DECODER * 

120 REM ££££££XXXXX££££XX£ 

130 REM 99’ER VERSION 7.81.1XB 
140 REM BY W.K. BALTHROP 
150 REM 
160 REM 

170 OPEN #1:"RS232/2.BA=48O0.DA=8" 
FIXED 15 
1 BO INPUT #1:C1$ 

190 DISPLAY AT(5,3):"DIGITIZED 
CODEs" 

200 FOR X=1 TO 15 

210 DISPLAY AT<6,5+X)SIZE(1): 

CHR* (ASC <SEG*(C1$,X,1) >-12B> 
220 NEXT X 
230 GOTO 180 



■ EXPLANAT (ON OFTHE PR 0GRAM 

- • ' • * * Mt PADBEMO - 

. - ' . ^ * - . ¥ ■■ ; ‘ 

. s ■ ■ v p 

Line Nos. ' 


170 

180 

190-250 


DREW RS-232 port. 

Set tip-variables •• 

Display option page & INPUT 

■choice/V* ■ : , 

branfch to routine specified, 
insfru ctkm 1 and coht ro I; 1 
; Instruction and control for digitiz¬ 
ing end of line.;, , 

Whirl? .type of lirtear, unit will be 
.used? ■, 1 ;• - ■ ■; . - ■ 

■Mow many of the units are there in 
the calibration line you plotted? 
Calculate* units per ; inch; GOTQ 
title; |Mtge.; • • ■ 1 

Mh^tnuctibn & control for digit iz- 
{rigUseginbihg of fine. 

Print, Instructipm to, digitize the 
Jirre.' Update line length and print 
on scream :: t ; ; :■• ■ ’ 

brnructlon, and control to dalcu- 
latetotai area, * \ . ' ; ; 

600-640 Calculate:total area and display. 
@5p-670 Calculate, distance ‘ between two 
" point’s■■ ’ ■ t :■ -- I. ; , 

Define X, V coordinates. , 

Iriput data from digitizer pad. 
Assembfe 1 data fron) pad into pro¬ 
per ASCI h characters, (subtract 128 
ASCII). - 


260,280 
290310 
320360 

370 * 

' . : r . 

380 ; : l 
.390400 
410420 

430310 

.* ■ " 

' ■. x- 

c. v 

520390 


130 REM 99*ER VERSION 7.Q1.1XB 
140 REM BY HOUSTON INSTRUMENT 
150 REM 
160 REM 

170 OPEN #1i"RS232/2.TW.BA=A800. 

DA=8".FIXED 15 
180 UPI = 1 :: V*=*'INCHES" 

190 CALL CLEAR 

200 DISPLAY AT(3,3):"MENU: SELECT 
ONE OF THE PROGRAMS." 

210 DISPLAY AT(7,3):"1. CALIBRATE." 
220 DISPLAY AT(9,3):“2. DISTANCE." 
230 DISPLAY AT(11.3)s"3. TOTAL 
AREA." 

240 DISPLAY AT <24,6):"YOUR CHOICE?" 
250 ACCEPT AT(24,18)BEEP:C :: IF 
C=0 OR 03 THEN 250 
260 CALL CLEAR 

270 ON C GOTO 290.410,520 
280 GOTO 250 

290 DISPLAY AT<3,3):"PLACE 

DIGITIZER AT BEGINNING OF 
CALIBRATION LINE 
AND DIGITIZE." 

300 GDSUB 730 

310 GOSUB 680 :s X2=X :: Y2=Y 
320 DISPLAY AT(8,3):"NOW PLACE THE 
CURSOR AT THE END OF THE LINE 
AND DIGITIZE" 

330 GOSUB 730 
340 GOSUB 680 

350 X1=X2 :: Y1=Y2 :: GOSUB 650 



GOSUB 680 


OF 

■ I p II |i 


xs=x 


460 GOSUB 730 :; 

: GOSUB 650 
470 CALL KEY(O,K,S>: 

: IF S=ASC(“M"> THEN 190 
480 X1=X :: Y1=Y 
490 TD=TD+D*UPI 

500 DISPLAY AT(B,IB):ABS(TD)}V* 
510 GOTO 460 

520 TA—0 :: DISPLAY AT(3,3): 

‘DIGITIZE ALONG OUTER LINE 
AREA TO BE COMPUTED." 

530 DISPLAY AT( 8 ,3):"HIT THE 
KEY WHEN FINISHED. 

540 GOSUB 730 :: GOSUB 680 : 

: XP—X : : YP-Y : YS-Y : : 

550 GOSUB 730 :: GOSUB 680 : 

s X=X Y=Y 
560 A=CCYP+Y)/2)*CXS-XP) 

570 TA=TA+A 
580 YP=Y :: XP=X 
590 GOTO 550 

600 TA=TA+<(YP-YS)/2)*(XS-XP) 

610 DISPLAY AT( 6 ,3):"TOTAL AREA :"5 
ABS(TA * UPI"2);”SQUARE";V* 

620 DISPLAY AT(20,3):“HIT THE ""M" 
KEY TO SELECT THE MENU.“ 

630 ACCEPT AT(22, 12> : I♦ :: if 
I#< >"M" THEN 630 ELSE CALL 
CLEAR :: GOTO 200 
640 END 

650 REM SUBROUTINE TO COMPUTE 
DISTANCE BETWEEN POINTS 
(XI, Y1 ) St (X, Y) 


It 


360 IPU=D 

370 DISPLAY AT(12,3)BEEP:"WHAT TYPE 660 D=SQR(((Xl-X) A 2>+((Yl-Y)^2)) 
OF UNIT IS THIS CALIBRATION 670 RETURN 


680-710 
720-790 
800-830 


IOO REM tt*****X«****x* 
110 REM * HI PAD DEMO * 
120 REM ***£XX*XX«***XX 


BASED UPON?" :: ACCEPT 
AT (15,3):V* 

380 DISPLAY AT(17,3)BEEP: 

"HOW MANY “;V»;" DOES THE":" 
CALIBRATION LINE REPRESENT?" 

: ACCEPT AT(20,3)iA 
390 UPI=A/D 
400 GOTO 190 

410 DISPLAY AT(3,3):“NOW DIGITIZE 
THE BEGINNING OF THE LINE." 
420 GOSUB 730 :: GOSUB 680 : 

i X1=X :: Y1=Y 
430 DISPLAY AT(5,3) 

THE CURSOR TO 
THE LINE." 

440 DISPLAY AT(8,3) 

DISTANCE:" 

450 DISPLAY AT(12,3):"WHEN 

FINISHED SELECT ””M“» TO 
RETURN TO MENU.“ 


“BEGIN USING 
DIGITIZE 

"TOTAL 


680 REM SUBROUTINE TO DEFINE X,Y 
COORDINATES 

690 X=VAL(SEG«(D*,3,5))/IOOO 
700 Y=VAL(SEG*(D*,9,5))/IOOO 
710 RETURN 

720 REM SUBROUTINE TO ASSEMBLE 
STRING 
730 D*="" 

740 INPUT #1:C1* 

750 CALL KEY(0,K,S) 

760 IF K=ASC("M")THEN 190 

770 IF K=ASC("A")THEN 600 

780 GOSUB 800 

790 RETURN 

800 FOR Z-l TO 15 

810 D*=D*S<CHR* (ASC(5EG*(C1*, Z, 

1))-128) 

820 NEXT Z 
830 RETURN 
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In this age of runaway inflation... 




The ideal input device for the small 
system user. 


WH7-! 


Mm-! 

UAAft 

km it—& 

JMAJ 

UMtt-l 




la pi 4-4 

HftuH 

MHr-p 


SF'14-4 



Two h=* 
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tuv 
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Available with stylus or optional cursor. 



Available with optional display. 


The HIP AD™ digitizer 

Inexpensive input to your computer 

The HIPAD™ digitizer can be used for both converting graphic information into 
digital values and as a menu. Utilizing either the stylus or the optional cursor, the 
operator can input graphic data into the computer by locating individual points on 
the digitizers 11" x 11" (28cm x 28cm) active area. In the “stream mode” a contin- 
uance of placements of coordinate pairs may be input. 

Not a kit, the HIPAD™ comes complete with both RS-232-C and parallel interfaces 
and has its own built-in power source. The origin is completely relocatable so coor¬ 
dinates may be positive or minus for a true reference value and oversized material 
may by input by simply resetting the origin. 

Accurate positional information, free form sketches, 
even keyboard simulation 

All can be entered using the multi-faceted HIPAD™ digitizer. Its capabilities and 
low price make the UL listed HIPAD™ a natural selection over keyboard entry, inac¬ 
curate joysticks, or expensive approximating light pens. It’s perfect for inputting 
isometric drawings, schematics, X-rays, architectural drawings, business graphs, 
and many other forms of graphic information, as well as creating your own graphics. 

Use it with Apple II™ , TRS-80 Level H™, PET™ or other 
popular computers 

The HIPAD's™ built-in RS-232-Cand parallel 8 bit interfaces make it all 
possible. (For Apple II order DT-11A, for TRS-80 or PET order DT-11). 

Furthermore, you get English or metric scaling, data format (Binary/BCD/ASCII), 
selectable baud rates, and resolution of either .005" or .01". 

For complete information, contact Houston Instrument, One Houston Square, Austin, Texas 78753, 
(512) 837-2820. For rush literature requests, outside Texas, call toll free, 1-800-531-5205. 

For technical information ask for operator #5. In Europe, contact Houston Instrument, 
Rochesterlaan 6, 8240 Gistef, Belgium. Phone 059/27-74-45. 


TM HIPAD is a trademark of Houston Instrument 
TRS-80 is a trademark of Tandy Corporation 
APPLE is a trademark of Apple Computer Inc, 

PET is a trademark of Commodore Business Machines, Inc. 


Houston instrument 


GRAPHICS DIVISION OF 

BAUSCH & LOMB 



*\J'S. Suggested retail price 











“WRITE YOUR 

OWN PROGRAMS 


Solution for Problem 
May/June Issue 


100 REM **************** 

110 REM * t 

120 REM * NUMBER MATCH * 

130 REM * EXPANDED * 

140 REM * t 

ISO REM ItmtfUtUIttl 

160 REM 

170 REM BY JAMES DUGAN 

ISO REM 99’ER VERSION 7.S1.1 

190 RANDOMIZE 

200 GOSUB 620 

210 FOR 1=1 TO 25 

220 LET A=INT(RNDtlO) 

230 LET MSG*=MSG*&STR*(A) 

240 CALL CLEAR 

250 PRINT "HERE IS THE NUMBER":* 

260 PRINT "YOU HAVE";D;"SECONDS TO STUDY IT"::::! 

270 FOR DELAY=1 TO 100 

230 NEXT DELAY 

290 PRINT TAB(5)*MSG*: 

300 SOSUB 530 
310 CALL CLEAR 
320 GOSUB 360 
330 LET T=T+1 
340 NEXT I 
3S0 GOTO 720 

360 PRINT "TYPE THE NUMBER" 

370 INPUT RES* 

380 IF RES*OMS6* THEN 450 
390 CALL CLEAR 

400 PRINT TAB(11) 5 "GOT IT: 

410 CALL SOUND(1000,262,1,330,1,392,1) 

420 FOR DELAY=1 TO 400 
430 NEXT DELAY 
440 RETURN 

450 PRINT "SORRY! THE NUMBER WAS: "jMSG* 

460 CALL SOUND(1OOO,-3,1) 

470 FOR DELAY=1 TO 500 
480 NEXT DELAY 
490 PRINT ::::: 

500 INPUT "DO YOU WANT TO CONTINUE? »«y«» 

OR "“N“"."sANS* 

510 IF ANS*<>”Y"THEN 560 
520 RETURN 

530 FOR DELAY*1 TO D*333 
540 NEXT DELAY 
550 RETURN 
560 PRINT ::: : : 

570 PRINT "THE LONGEST NUMBER YOU" 

580 PRINT "REPEATED CORRECTLY WAS ";T 
590 PRINT "DIGITS LONG"::s: 

600 STOP 

610 REM **INITIAL SCREEN** 

620 CALL CLEAR 

630 PRINT TAB(9);"NUMBER MATCH":s s: 

640 PRINT TAB(5);"I CHALLENGE YOU TO REPEAT A" 

650 PRINT TAB(5);"SERIES OF NUMBERS.": 

660 PRINT TAB(5);"EACH TIME YOU GET IT RIGHT" 

670 PRINT TAB(5);"I WILL ADD ANOTHER DIGIT":: 

680 PRINT "HOW MANY SECONDS DO YOU” 

690 PRINT “WANT TO STUDY THE NUMBER* 7 " 

700 INPUT “(.1-10)“tD 
710 RETURN 
720 END 

CORRECTION: 

"How To Write Your Own Programs" 

May/June 1981, p. 11 [Ex. 3, Step 4, Coding] 

Due to a typographical error, line 140 was incorrectly listed. The 
correct statement should have been: 

140 If N=99 THEN 150 ELSE 110 

or, reduced to an even simpler expression: 

140 IF NO 99 THEN 110 


630 PRINT TAB(9) 
640 PRINT TAB(5) 
650 PRINT TAB(5) 
660 PRINT TAB(5) 
670 PRINT TAB(5) 


Consumer Electronic Show , .. from p. 49 

additional storage devices at each student station. [Watch 
for an in-depth product review in a forthcoming issue of 
99’er Magazine.] 

Additional Software 

Tl’s floor display was subtly “engineered” to drive 
home the point that its rapidly growing software arsenal is 
already quite substantial. All pathways led into a central 
“software monolith’-a huge display case covered with all 
of the existing Command Module packages. Of ail the 
software that was actually available for “hands-on” testing, 
I was most impressed with the Command Modules produced 
for Tl by Scott Foresman and Company—a leading publisher 
of school text books. Add it ion & Subtraction / is the perfect 
example of an interactive program that utilizes ai! the special 
features (and utilizes them weii) of the Tl machine-includ¬ 
ing speech. Between the unique creative programming envi¬ 
ronment of Tl LOGO and the polished, animated, Sessame 
Street-style drill and practice software of Scott Foresman, 
it appears that the Tl microcomputer is destined to assume 
a leadership position in the field of computer-based educa¬ 
tion. [Watch the September/October issue for a review of 
the new Scott Foresman software.] 

The most significant piece of software at the show, how¬ 
ever, was kept confined to a “back room.” I say “most signi¬ 
ficant” because with it a serious programmer can pare away 
the layers of “friendliness” on TFs mild-mannered consumer 
computer to expose the heart of the extremely powerful 
16-bit machine within. This stand-alone {not part of the 
UCSD Pascal Development System) TMS9900 assembler 
will be released on Command Module and will come with a 
thorough reference guide. Tl obviously has a lot of expe¬ 
rience in writing and documenting TMS9900 assembler 
packages, so we can expect this one to be a quality product, 
incidentally, the assembler and full-featured text editor 
were largely lifted from Tl’s 990-series of business com¬ 
puters. 

With typical Command Module simplicity and efficiency, 
at the touch of a number key you can (1) ASSEMBLE, (2) 
EDIT, (3) LOAD & RUN, or (4) RUN, The text editor 
provides you with a horizontally scrolling (in 20 column 
tabs) 40-column “window” into the full 80-column screen, 
and executes at “blinding speed”—significantly faster than 
the one written in pseudocode that comes as a part of the 
UCSD Pascal Development System (see 99’er Magazine , 
May/June 1981, p. 55). Soon, programmers with aTI-99/4 
or 99/4A disk system (one disk drive required) will be able 
to snap in this Command Module and be off and running. 
The prospects, therefore, look very good for the develop¬ 
ment of a host of serious, high-caliber new applications and 
simulations software for end users (LOADable into the 32K 
Expansion RAM and CALLable through Extended BASIC). 
Software of this type has not yet appeared because of the 
limitations of speed and high memory overhead imposed by 
a BASIC programming environment. 

That was the summer CES as I saw it-all in all, an im¬ 
pressive performance from Texas Instruments. There was a 
world of difference between the Tl at the winter CES, five 
months earlier in Las Vegas, and the Tl exhibiting this 
summer in Chicago: The feeling this time—readily observa¬ 
ble in the spirit and excitement of attending T! sales and 
management personnel-seemed to be one of “We’ve come 
a long way, Baby ...” It makes one anxious to tap some 
more “reliable sources” to find out whatTI is planning for 
the next CES this winter. . . 


Tilt 
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Part 1: 
Learning the 
Keyboard Symbols 


By Regena 


W elcome to QWERTY Academy 
—the school where everyone 
can either learn typing, or im¬ 
prove their existing typing skills. The 
Academy was named after the first six 
letters (left to right) on the second row 
of keys found on a standard typewriter. 
The instructors at QWERTY are proba¬ 
bly already familiar to you. In fact, 
most of you are sharing your home with 
one right now. That’s right-a Texas 
Instruments TI-99/4 personal computer, 
whose color graphics and sound capa¬ 
bilities make it one teacher you’ll actual¬ 
ly have fun learning from . .. 

There are several differences between 
the TI-99/4 keyboard and a standard 
typewriter keyboard. Beginners won’t 
have to worry about this until switching 
to a regular typewriter. At that point, 
the necessary adjustments are easy to 
make. Those of you who already “touch 
type” should learn the special fingering 
procedures needed for efficient typing 
on the Tl keyboard. This will permit 
your letter writing to go faster, with 
fewer mistakes, and allow you to enter 
code more efficiently with fewer syntax 
errors when programming. 

One main difference in the keyboards 
is that there is not a “home” key for the 
right little finger (“pinky”) to rest upon. 
A “dummy” key is available (on a over¬ 
lay from Texas Instruments) to help 
solve this problem. Another difference 
is the placement of the ENTER key: 
The TI-99/4 computer has the ENTER 
key where the typewriter has a SHIFT 
key (or where the period would be if 
you’re using a dummy key), so a typist 
may tend to ENTER more than he or 
she wishes. And when, for example, a 
comma is needed, a typist must use a 
left-hand SHIFT to have it print correct¬ 
ly. Also, since there isn’t a SHIFT key 
for the right hand, the symbols on the 
left side of the keyboard require press- 
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ing the SHIFT key with the left little 
finger, and pressing the symbol with 
either the left index or middle finger. 

The instructional program that fol¬ 
lows assumes that its users are already 
familiar with touch-typing techniques 
and just need to learn and practice the 
symbols on the TI-99/4 keyboard. A se¬ 
ries of programs for teaching touch typ¬ 
ing to beginners will commence in the 
next issue. In the meantime, beginners 
can practice with the symbols if they 
wish, or can save the program until after 
mastering the alphabetic keys. There 
will be versions (with only slight differ¬ 
ences) for both the TI-99/4, and the 
new, soon-to-be-available TI-99/4A with 
its standard typewriter keyboard. This 
magazine will also provide programs for 
experienced touch typists who wish to 
improve their proficiency. 


The Program 

The program starts with the period 
(decimal), the only symbol that does 
not require the SHIFT key, and pro¬ 
gresses through the other symbols. 
Suggested fingering for each of the sym¬ 
bols is presented. After each symbol or 
set of symbols is presented, there is a 
practice drill which includes the new 
symbol and previously learned symbols. 

Each drill consists of actual phrases 
and statements that a programmer 
would use. You must type five phrases 
correctly to complete the drill and move 
on to the next lesson. A phrase is chosen 
randomly from nine phrases entered as 
data, and it is printed on the screen. Af¬ 
ter the prompter “beep,” you must 
copy the phrase. If you type the phrase 
correctly, that phrase will not be used 
again; but if you type it incorrectly, it 
may be used again until a total of five 
phrases are correctly typed. 


Because only a left-hand SHIFT key 
is available, the left little finger presses 
the SHIFT key and the middle finger 
presses the !, @, and # keys. You may 
prefer to use the index finger on %, $, 
and # and the third finger on ! and @, 
and also use the right index finger for ? 
rather than the left. After most of the 
symbols have been presented, six of the 
rarely used symbols are listed with their 
suggested fingering. There is not a drill 
for the final six symbols because they 
do not appear in programming state¬ 
ments other than perhaps a PRINT 
statement or a variable name. You press 
any symbol to continue the program. 

After all the symbols have been in¬ 
troduced, you have a choice of starting 
the instruction over, having a final re¬ 
view, or ending the program. The final 
review consists of ten phrases or state¬ 
ments chosen randomly from the fifteen 
possibilities. You type the ten state¬ 
ments, and are given a score of number 
right and number wrong. 

The program uses color graphics and 
sound to enhance the instruction. Musi¬ 
cal phrases from Chopin’s “Fantasie 
Impromptu” are played at the title 
screens and after each drill. 

Programming Techniques 

This is a full-memory program so 
some conservation techniques were nec¬ 
essary. PRINT statements are “stacked” 
by using colons to indicate new lines. 
Also, DATA statements contain over 
three lines of data {less than T12 charac¬ 
ters). There are no REM statements (ex¬ 
cept for the title header). The CALL 
SOUND statements contain only the 
melody note; there wasn’t enough 
memory for accompaniment. 

In lines 430-760, graphics statements 
are interspersed among the CALL 
SOUND statements to define the special 

















characters and colors while the music is 
playing. 

Statements 810-880 and 4370-4450 
print the keyboard a line at a time ra¬ 
ther than using HCHARS, which are 
slower. 

The drill phrases and typed responses 
are on a yellow background. This makes 
it easier to type in responses underneath 
the prompt. For example, you can tell 
if you have pressed the space or not. 

Nine phrases are read in as string var¬ 
iables in data. The phrases in the DATA 
statements must be enclosed in quotes 
because they contain commas and "other 
symbols that would otherwise be unac¬ 
ceptable in a DATA statement. For 
phrases that contain quote marks, three 
quotes must be used if the quote is at 


the beginning or end of the phrase, and 
two quotes if it is within. An example 
is: 500 DATA "PRINT ""HI"'"' 

In a FOR-NEXT loop (statements 
1530-1740, 3590-3790, 3880-3960), 

one of the phrases is chosen randomly. 
It is printed on the screen using HCHAR. 
A user’s response is received by a CALL 
KEY statement and printed on the 
screen a letter at a time as it is typed, 
and combined in another string variable, 
B$. This method is slower than using 
PRINT and INPUT statements, but has 
the advantage of not scrolling the screen, 
not messing up graphics, and avoiding 
user input error. Only 28 strokes are 
allowed for a user to type. No back¬ 
spaces are permitted. This is an instruc¬ 
tional program for learning the symbols, 


therefore users should not be fast 
enough typists to notice the relatively 
slow response time. 

Typed responses are compared with 
the prompts. If they are the same, an 
arpeggio is played and the phrase P$(J) 
is set to (null) so it cannot be used 
again. If the typed phrase is incorrect, a 
low noise is sounded, and 1 is subtracted 
from I in the loop counter. You must 
type 5 correct phrases to get out of the 
loop and complete the drill. That phrase 
also remains in the batch of available 
ones for possible use in the drill. Each 
time a new phrase is picked randomly, it 
is checked to see if it is null. If so, an¬ 
other phrase must be chosen. 
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100 

110 

120 

130 

140 

ISO 

160 

170 

180 
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200 

210 
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230 
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260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 


REM ****************** 

REM * TYPING SYMBOLS * 

REM **S*****tS«*t****« 

REM 99"ER VERSION 7.81.1 y <—-'v 

REM BY REGENA f A j\ 

REM f / V f\ 

rem \jjrL jj 

DIM P*(14) —\/ 

CALL CLEAR ^^ 

CALL CHAR(152,"O") 

CALL CHAR <153, M FFFFFFFFFFFFFFFF") 
CALL CHAR(154,“OOFFFFOOOOFFFF”) 

PRINT TAB(9)j"T Y P I N G "st TAB<11); 
“ON THE“siTAB <11)j”TI 99/4“:;ss::ss 

> > I • I 1 i i 

CALL CHAR(155,“OOOOOOFFFF") 

CALL CHAR (156, ''FFBFSF8FFFF8F8FS “ ) 
CALL CHAR(157,“FFFFFFFF“) 

CALL CHAR(158,“FOFOFOFOFOFOFOF“) 

CALL COLOR(16,2,12) 

FOR X-13 TO 23 

CALL HCHAR(X,7,152,18) 

NEXT X 

CALL HCHAR(15,7,155,18) 

CALL HCHAR(13,20,154, 4) 

CALL HCHAR(14,20,154,4) 

FOR Y-20 TO 23 

CALL VCHAR(16,Y,153,7) 

CALL HCHAR(Y-2,8,153,11) 

NEXT Y 

CALL HCHAR(22,8,153,11) 

CALL HCHAR(19,9,156,9) 

CALL HCHAR(20,9,156,9) 

CALL HCHAR(21,10,157,7) 

T-200 

CALL SOUND(6*T,440,5) 

CALL CHAR(96,“FFFFFFFFFFFFFFFF") 

CALL CHAR(97,“00000000003C7EFF") 

CALL CHAR(104,“OFOFOFOFOFOFOFOF") 


470 CALL CHAR (105,"O3O7OF0F0F0FOFOF") 

480 CALL CHAR(106,”COEOFOFOFOFOFOF”) 

490 CALL CHAR(107,"FOFOFOFOFOFOFOF") 

500 CALL SOUND(40,494,5) 

510 CALL SOUND(40,554,5) 

520 CALL SOUND<2*T,494,4) 

530 CALL CHAR(124,“00000000003C7EFF") 

540 CALL SOUND(T,440,4) 

550 CALL CHAR(120,"OFOFOFOFOFOFOFOF") 

560 CALL SOUND(2*T,587,3) 

570 CALL CHAR(121,"O3O7OF0FOF0FOFOF") 

580 CALL CHAR(122,"COEOFOFOFOFOFOF") 

590 CALL SOUND(T,659,3) 

600 CALL CHAR(123,"FOFOFOFOFOFOFOF") 

610 CALL SOUND<6*T,740,2) 

620 CALL CHAR (128, "007446654474’*) 

630 CALL CHAR(129,"OOBE8888B888”) 

640 CALL CHAR(130,"OOEE9ACC8AEA") 

650 CALL CHAR(131,"007A427B0A7A") 

660 CALL SOUND(6*T,880,1) 

670 CALL CHAR(132,"005754075454") 

680 CALL CHAR(133,"OQBE08080008") 

690 CALL CHAR(134,“O”) 

700 CALL CHAR(135,"FFFFFFFFFFFFFFFF") 

710 CALL SOUND(3*T,784,2) 

720 CALL COLOR(13,2,7) 

730 CALL COLOR(9,12,1) 

740 CALL COLOR(10,12,1) 

750 CALL SOUND(3*T,740,2) 

760 CALL COLOR(12,12,1> 

770 CALL SOUND(3*T,659,2) 

780 CALL SOUND(2*T,740,2) 

790 CALL SOUND(T,587,3) 

800 CALL SOUND(6* T,440,4> 

810 R*-CHR*<152) 

820 FOR 1=1 TO 9 

830 R*=R«t" "SiCHRS (152) 

840 NEXT I 

Continued on p. 76 
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COMPUTER CHESS 





By Jerry Wolfe 


As a consequence of this recognized 
need for a higher level of understanding 
of the game, strong chessplayers had to 
be consulted. One of these was interna¬ 
tional master David Levy of Scotland. 
Levy is perhaps best known for his 
$10,000 bet (made in August 1968) 
that even within a decade, there still 
wouldn’t be a computer program that 
could defeat him in a match. In the 
years since his bet (which he won easily), 
Levy has been a frequent visitor at com¬ 
puter conferences, where he lectures 
and plays simultaneous exhibitions 
against several of the current programs. 
Incidentally, he also acted as a consul¬ 
tant to Texas Instruments in the devel¬ 
opment of the Video Chess program. 


with brute force searching techniques to 
choose a move, Therefore, they are lim¬ 
ited by how well the program “under¬ 
stands” chess theory and can "think” 
like a human player, and by speed and 
memory considerations. The speed and 
available memory determine how far 
ahead the program can look and how 
many positions can be examined and 
evaluated in a given amount of time. 
The number of moves the program can 
look ahead in a given position is called 
its "search horizon” (Levy’s term). 

For these reasons, even though they 
play relatively strong chess, chessplaying 
programs have certain characteristic 
weaknesses which can often be ex¬ 
ploited. For example, a program may 
sacrifice a bishop or a knight on one 
side of the board to win a rook (with a 
knight usually) in a corner on the other 
side, and leave the knight trapped after 
it captures the rook. To any human 
chessplayer, it would be evident that the 
knight was permanently trapped and 
would eventually be lost—leaving the 
player with only a rook (5 units) to 
show for the loss of two minor pieces (a 
total of 6 units). However, the com¬ 
puter would merely consider the situa¬ 
tion a gain of two units (lose a bishop or 
knight and gain a rook) as long as the 
stranded knight could not be captured 
within the number of moves in its search 
horizon. The limited search horizon 
leads to other situations where short 
term expedients are followed to the 
detriment of position. 

Future improvements in speed will 
extend the search horizon of chess pro¬ 
grams and thereby increase their playing 


"Even though they play relatively strong 
chess, chessplaying programs have 
certain characteristic weaknesses 
which can often be exploited" 



E ver wondered where your computer 
got the “intelligence” to beat you 
in a game of chess? It’s all in the 
program, you say? But then where did 
chess-playing computer programs come 
from? You might suppose that the 
impetus for the development of these 
programs came from chess players 
themselves. But in fact, this was not the 
case at all. It was researchers in the field 
of artificial intelligence (psychologists 
and computer scientists) who we have 
to thank for those embarrassing check¬ 
mates ... 

The goal of these researchers was to 
determine the nature of intelligence 
itself: what precisely it was, and conse¬ 
quently, what it was not. This was no 
easy task. They hoped to shed some 
light on this problem by getting com¬ 
puters to do things that if performed by 
a human would require “intelligence.” 
It didn’t take long to figure out that 
chess was a natural: It presumably re¬ 
quired highly intelligent behavior, and 
yet, it was “contained” enough so that 
initial programs designed just to play 
“legal” games would not be prohibitive¬ 
ly large. As these programs were de¬ 
veloped, it soon became obvious that to 
progress from legal games to good, or 
even just reasonable play, required close 
attention to basic theory and concepts 
as understood by humans. For example, 
the number of possible positions after 
only the first ten moves in a game is a 
number having over a hundred zeros in 
it! Hence, looking at all possible posi¬ 
tions is clearly impossible. 


About the Author 

Jerry Wolfe is a professor of mathematics 
at the University of Oregon in Eugene, Oregon. 
He has been playing chess since the age of 
eleven and began playing in chess tournaments 
at the age of fourteen. He is the 1979 Oregon 
Open champion and has won numerous other 
local tournaments in the Pacific Northwest 
during his chess "career." Currently he 
holds the official rating of candidate master. 


Levy has therefore provided a valua¬ 
ble link between the artificial intelligence 
community and the large community of 
chessplayers. He, perhaps more than 
anyone else, has been in the best posi¬ 
tion to measure the rate of computer 
chess progress. In his view (and mine as 
well) the rather recent advent of micro¬ 
processor chessplaying machines will 
make chess popular and accessible as 
never before. The revolution has just 
begun! 

As indicated above, chessplaying 
programs do not attempt to find a move 
by searching all possible combinations 
of moves. Rather, chess programs com¬ 
bine chess theory and concepts together 


strength even further. In my opinion, 
without considerable improvement in 
the longer range strategic capabilities of 
these programs, they will not be able to 
reach the level of world-class human 
players. However, we players in the 
other 99.99% had better watch out! 

As an experiment, I recently pitted 
m y Video Chess (a TI Co m m and Module) 
program against the Boris machine with 
the Morphy module. Boris-Morphy is 
reputedly the strongest commercially 
available microprocessor chessplaying 
machine. The match consisted of play¬ 
ing the Video Chess program at its 
highest level (Intermediate, 200 seconds 
per move) against the Boris-Morphy ma- 
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chine at three different levels from high 
to low. Although the Boris-Morphy pro¬ 
gram won all three games, the Video 
Chess program obtained a winning posi¬ 
tion against the two lower levels, but 
could not find the knock-out punch. 
The top level of Boris-Morphy seems 
clearly stronger than Video Chess. All in 
all, the results were not bad and since 
the top current level of Video Chess is 
called “Intermediate,” we may look for¬ 
ward to further strengthening of the 
program. I hope to report on similar ex¬ 
periments with other machines in future 
articles. 

The two problems I’ll leave you with 
this time are both from games by famous 
chessplayers. The first position is from a 
game of "speed” chess played in 1912 
between American Edward Lasker (who 
died recently at age 96!) and former 
English champion Sir George Thomas. 
The rules were, I believe, that neither 
player could allow his own clock to get 
more than five minutes ahead of his op¬ 
ponent’s clock. To find such a pretty 
mating combination at that speed is im¬ 
pressive. The second position was played 
by the great American champion Harry 
Nelson Pillsbury near the turn of the 
century in an exhibition where he played 
blindfolded against 22 different oppo¬ 
nents simultaneously! Blindfold play is 
not as difficult as you might think—try 
it against your Video Chess program 
sometime—but to (successfully) play 22 


such games is phenomenal. In recent 
times George Koltanowski has played 
blindfolded against more than 50 oppo¬ 
nents simultaneously. But Pillsbury’s 
achievement is magnified by the fact 
that he could perform well in blind 
simultaneous play against masters! 

SOLUTIONS TO THE PROBLEMS 
IN THE LAST ISSUE: 

Problem No. I: 

1. D3 - D8 check E8 -D8 

2. D2 - G5 double check. 

(a) 2 . . . D8 - E8 

3. D1 - D8 checkmate 

(b) 2 . . . D8 - C7 

3. G5 • D8 Checkmate. 

Problem No. 2: 1 .. . C3 - G3 !! 

Black appeared to be in trouble sjnce 
after the apparently forced retreat of his 
queen out of danger, white could capture 
the rook on H3 and be decisively ahead 
in material. Black had forseen all this, 
however, and replied with the crushing 
move above. White has three ways to 
capture the black queen (which must 
be captured else mate on H2 is inevita¬ 
ble)--all unsatisfactory. 

(a) 2. H2-G3 D4 - E2 checkmate. 

(b) 2. F2 -G3 D4-E2 check. 

3. Gl-Hl F8-F1 checkmate. 

(c) 2. G5-G3 D4 - E2 check. 

3. G1 • HI E2 -G3 check. 

4. H1-G1 G3-E2 check. 

5. G1 - HI H3-C3 

and black is a full piece ahead 
with an easy win. 

In the actual game, white resigned after 

1... C3 -G3. 



Vol. 1 

ALIEN 




Blast down alien saucers 
and the “Ultimate Alien” 
to score. Five lives against 
the endless alien army. 
Fast action, music, graph¬ 
ics. Difficulty increases 
with skill. 

X-WING 

PILOT 

Squads of TIE-Fighters 
are escaping from a raid 
on your rebel base. Your 
mission: Destroy all with 
limited fuel, or “Good- 
Bye Rebel!” Graphics, 
Sound, 3 skill levels. 

INVADE 



THE EMPIRE 

Commanding a starship, 
you mu st destroy 4 enemy 
vessels to gain control of 
sector ON-9. This chal¬ 
lenging space game re¬ 
quires skill & strategy. 
Graphics, Sound, 3 skill 
levels. 


Programmed inTI BASIC, 16K 
Complete Documentation 
& Instructions included. 

ALL 3GAMES 

Regular Price $14.95 Cassette 

$19.95 Disk 

INTRODUCTORY SPECIAL: 

Mention this ad and pay only 

$8.95 cassette 
$12.95 Disk 

Send Check or Money Order To: 

The Software Exchange Group 
P. O. Box 97 
North Chili, NY 94514 

Tel: (716)594-9474 
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Civil Engineering 

Fundamentals 

Simple Beams 


By Regena 


T he purpose of this program is to 
tutor civil engineering students 
who are studying statics or struc¬ 
tures. It is limited to a simple determi¬ 
nate beam supported at the ends, and 
loaded with a concentrated load, a uni¬ 
form load, or a combination of a con¬ 
centrated load and a uniform load. A 
basic knowledge of elementary statics is 
prerequisite. 

There are six sections in the program. 
The student’s objective is to learn how 
to solve for the reaction forces A and 
B at each end of the loaded beam. 

1. Concentrated load at the center 

Newton’s laws of force and moments 
are reviewed. The general solution of a 
load P applied at the center on a beam 
of length L is developed for the reaction 
forces A and B at each end of the beam. 
The student then does two problems. 
The load P and length L are chosen ran¬ 
domly for the problems. If he enters an 
incorrect solution, the correct solution 
is given, and he is given another problem. 

2. Concentrated load anywhere 

Newton’s laws of force and moments 
are reviewed. The general solution of a 
load P applied a distance D from end A 
on a beam of length L is derived for the 
reaction forces A and B at each end. An 
example problem is given and solved. 
Then a problem is given for which the 
student enters his answers. The program 
prints the method of solution. For the 
next problem the student enters his solu¬ 
tion. If he is incorrect, the program 
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shows him how to solve the problem, 
and he is given another problem to solve. 

3. Uniform load 

The uniform load is considered as an 
equivalent concentrated load acting at 
the centroid of the loading pattern. The 
first example is a uniform load for the 
length of the beam, and is solved in 
general terms. The student is then given 
a problem. If he enters an incorrect an¬ 
swer, he is shown the correct solution 
and given another problem. 

If the student is correct, a sample 
problem with uniform loading over part 
of the beam is presented. Then he is 
given a problem of this type and asked 
to solve it. If he is incorrect, the solu¬ 
tion is shown and he is given another 
problem with this type of loading. 

4. Combination loads 

Instructions are provided for how to 
solve a beam with one concentrated 
load and one uniform load. The student 
is then given a problem with combina¬ 
tion loads chosen randomly. The pro¬ 
gram draws and labels the beam for each 
problem. If the student enters an incor¬ 
rect solution, the correct solution is 
printed and he is given another problem. 

5. Problems only 

No instruction is given. The program 
randomly chooses a beam length and 
loading pattern, and prints the problem. 
It then draws and labels the beam. The 
student enters his answers; if he is incor¬ 
rect, the correct answers are given and 
another problem is printed. 

6. Your own problems 

The student enters the beam length and 


loading specifications. The program 
computes the reaction forces A and B at 
the ends. 

After each section has been completed 
with correct solutions, the student is 
given the choice of having more of the 
same kind of problems, entering his own 
problems, or returning to the menu 
screen. 

Programming Techniques 

This program is a teaching aid or tu¬ 
tor, so it incorporates pauses, allowing 
the student to work on the problem be¬ 
fore continuing. The student must enter 
a correct solution to the problem before 
he or she can go on to a different kind 
of problem. If the student enters an in¬ 
correct solution, the correct answers 
are printed and another problem of the 
same type is presented. 

The numbers for each problem are 
chosen randomly (yet appropriately) for 
each beam. The length of the beam is 
between 10 and 20 feet. The concen¬ 
trated load is 100 times a random num¬ 
ber from one to twenty (i.e., 100 to 
2000 pounds), and is placed at a dis¬ 
tance D from end A {randomly chosen 
within the bounds of the length of the 
beam). 

The uniform load is 10 times a ran¬ 
dom number from one to ten (i.e., 10 to 
100 pounds per foot). For some of the 
problems, the uniform load is acting 
over the length of the beam. For more 
advanced problems, it is between two 
points on the beam measured by the 
distance from end A (as LI and L2). LI 
must be equal to or greater than zero, 
and less than the total length of the 









beam. L2 must be greater than LI, and 
less than or equal to the total length of 
the beam. 

The problems are written in "story 
problem” form by using print statements 
in subroutines, with the program using 
only the statements that are necessary 
for each loading condition. 

After the student has had time to 
draw and label the problem on his own 
paper, he can "PRESS ENTER TO 
CONTINUE” and the beam will be 
drawn on the screen with approximate 
proportions. 

The general beam is drawn with a pin 
at end A and a roller at end B. 

The distances are approximated by 
using a variable y-coordinate—an integer 
value of the fraction of the distance (D 
or LI) divided by the total beam length 
multiplied by the number of characters 
printed in the general beam. For exam¬ 
ple, Statement 6750 is 


Y=INT(L1/LL* 22)+6 
Y is the y-coordinate used in CALL 
HCHAR or CALL VCHAR statements. 
6 is the displacement of the end of the 
beam from the left side of the screen. 

In statement 6760: 

Z=INT(D2/LL* 22)-1 
Z is the number of characters to be 
printed horizontally for the uniform 


The labels for the values on the beam 
are variable and are printed using string 
variabies. For example, the concen¬ 
trated load P may be three or four digits 
long (100 pounds to 2000 pounds) in 
the written problems, but the student 
may input an even longer number. This 
label is printed by using statements 
5850-5930 (see Figure 1). mm 


load. D2 is the distance L2—LI. 


■Figure!. 

LB$=STR$(PP) Converts PP to a string variable- 

FOR 11=1 TO LEN(LB$) LEN finds the length of LBS. 

JJ=II+J— 4 Calculation for y-coordinate. 

CALL HCHARU—5 ,JJ,ASC(SEGS(LB $,11,1))) Prints each digit in order. 

NEXT II 

CALL HCHAR(I—5,JJ+1,32) Prints a space aftefTast digit . 

CALL HCHAR(I—5 ,JJ+2,76) Prints L. 

CALL HCHAR0—5 ,JJ+3,66) Prints B. 

CALL HCHAR(I—5 JJ+4,83) Prints S 


EXPLANATION OF THE PROGRAM 
Line Nos. • 


100-250 Prints the title screen, 

260-330 Blinks a blue border. 

■ 340' ■ y-Clearath® screen. 

350-540 Defines special graphics characters for drawing 

the beam and loading and sets colors for them. 
550-680. Prints second screen, diagram of simple beam. 
690 Goes to menu screen for choice of problems. 

700 Choices 1 and 2, concentrated loads, branch 

V'.T; to here. •' 

710-810 Print? instruction screen. 

820-900 Prints second instruction screen. 

910 For Choice 2, branches to 1720 

920-1000 Prints problem: 


1010-1070 Draws and labels general beam. 

1080-1180 Shows solution of reaction forces in general 

- .'-terms. 

1190-1270 Draws and labels beam with centrally applied 

load. 

1280-1330 General statement for central load. 

1340-1370 Chooses random numbers for problem. 

13 80-1400 : Writ es the prob lem. 

1410-1440 Draws and lab els the beam. 

1450 Asks for A and B from student. 

14604540 Compares student’s answers with calculated 

solution and prints appropriate remark. 

15 50-1580 Has another problem, 

1590-1610 Asks if student wants more problems and 

.■ branches accordingly. 

1620-1700 Draw sand labels abeam for student’s problem. 
1710 : Solves and checks it. 

17 20-17 90 Prints instructions for second type of beam, 

• concentrated load anywhere. 

1800-1870 Draws and labels beam. 

1880-1970 Solves the problem. 

1980-2050 Chooses a problem and prints it. 

2060-2160 Draws and labels the beam. 

2170-2190 Solves the problem. 

2210-2240 TTompares input answers with calculated solu¬ 
tion,- • 

2250-2270 If; student is incorrect, solves the problem in 

2280-2290 Returns for a not her problem. 

2300-2330 Solution was correct. If it is the second prob¬ 
lem, another problem is chosen. 

2340-2360 Offers the student the choice for more prob- 

: ; lems. 

2370-2530 Solves a problem the student enters. 

2540-2600 Prints the general problem for a uniform load. 


lOO REM ** CIVIL ENGINEERING XX 
110 REM 
120 REM 

130 REM BY REGENA 
140 REM 

150 REM 99'ER VERSION 7.81.1 
160 REM 

170 CALL CLEAR 
180 PRINT TAB<7);“CIVIL ENGINEERING" 

190 PRINT s sTAB< 9 ) j "FUNDAMENTALS" 

200 CALL COLOR <2,1,1) 

210 PRINT i::::sTAB(7>; n XXtttttttttttttt" 

220 PRINT TAB<7)}"« * 

230 PRINT TAB(7);"f SIMPLE BEAMS *" 

240 PRINT TAB(7);“* *« 

250 PRINT TAB<7); "XttXXXtXtXtxtxtt"s ::s:s 
260 FOR E=1 TO 10 
270 CALL COLOR<2,6,5) 

280 FOR DELAY=1 TO 75 

290 NEXT DELAY 

300 CALL COLOR<2,5,6) 

310 FOR DELAY*1 TO 75 

320 NEXT DELAY 

330 NEXT E 

340 CALL CLEAR 

350 CALL COLOR(2,2,1) 

360 CALL COLOR<9,2,1) 

370 CALL COLOR<12,11,1) 

380 CALL CHAR <120,“OFOFOFOFOFOFOFOF") 

390 CALL CHAR <121,"FFFFFFFFFFFFFFFF") 

400 CALL CHAR C122,"FOFOFOFOFOFOFOFO") 

410 CALL CHAR(99,"1824242442428181") 

420 CALL CHAR < lOO, " 1824428181422418") 

430 CALL CHARC101,"0F09122449") 

440 CALL CHAR U02. "FF24499224**) 

450 CALL CHARC103,“F89O2O408") 

460 CALL CHAR <104,“1010383854549292") 

470 CALL CHAR(105,”10101010lOl01010") 

480 CALL CHAR ( 106,‘•9292545438381010" ) 

490 CALL CHAR(112,"FFFFFFFFFFFFFFFF") 

500 CALL CHAR <113,"FOFOFOFOFOFOFOFO") 

510 CALL CHAR <114,"OFOFOFOFOFOFOFOF") 

520 CALL CHAR<115,"FF") 

530 CALL CHAR (98, "FF601806083040FF’’) 

540 CALL COLOR<11,6,1) 

550 PRINT TAB(8);"SIMPLE BEAM"::: 

560 PRINT TAB(5);"SUPPORTED AT ENDS":::::::::::::: 

570 1=17 

560 GOSUB 5380 

590 J=12 

600 GOSUB 5560 

610 CALL HCHAR<1-5,12,80) 

620 FOR L=I-3 TO 1-1 

630 CALL HCHAR<L,17,112,10) 

640 NEXT L 

650 CALL VCHAR<1-3,27,113,3) 

660 CALL HCHAR<1-2,19,B7> 

670 PRINT " FIND THE REACTION FORCES" 

__Continued on p. 79 
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TI LOGO 



Space Shuttle: 

AN UPDATE ON 


LAMPLIGHTER ACTIVITIES 


By Henry Gorman Jr. 


Department of Psychology, Austin College 
Box 1584, Sherman, TX 75090 


T he previous issue of 99'erMagazine (May/June 1981) 
described how the Lamplighter school (a private 
school in Dallas for children from age 3 through the 
fourth grade) became the very first to provide its students 
with a truly computer-rich learning environment through its 
TI LOGO implementations. At the time the article was writ¬ 
ten, most of the students had been working steadily in 
LOGO for only six months. Children in the nursery school 
and kindergarten were using teacher-written programs to 
explore LOGO, and the other children in grades one through 
four were writing their own programs. There was, as ex- 


Figure 1. 


TO LAZY8 


FORWARD 4 

RIGHT 10 

TEST HEADING = 0 

IFF LAZY8 

FORWARD 4 

LEFT 10 

:§;§o 

END 

TELL TURTLE 

LAZY8 


Comment: 

TEST checks the heading of the Turtle. If it's not 0 (North), 
the Turtle continues to draw the LAZY8. 


After finishing the right-hand circle, the heading becomes 0 and the 
left-hand circle is drawn. 

To really understand why the left-hand circle ever gets completed, 
you have to know something about microprocessors and stack oper¬ 
ations. Keeping in line with the scope of this article, however, a sim¬ 
ple anthropomorphic explanation will have to suffice at this time. 
Watch forthcoming articles for an in-depth look at the technical 
aspect of the language. 

Think of the job of drawing the LAZY8 as being given to a group of 
little workmen inside the computer. The first workman carries out 
the first four lines then decides he needs a rest before continuing. 
Notice that in his initial contract TO LAZY8 he has agreed to even - 
tuaily carry out the FORWARD 4 and LEFT 10 specifications. The 
work must go on while he rests, so he subcontracts out the next 
stage to another little man. This workman also carries out the first 
four lines, then he too decides to rest. So before he gets to the 
FORWARD 4 and LEFT 10 tasks, he decides to subcontract out the 
balance of the work on the right-hand circle. This process goes on 
with enough tittle workmen (36 in this case) until HEAD!NG=0. At 
that time, the fast fitt/e man carries out his FORWARD 4 and LEFT 
10 tasks, and gives the job responsibility back to the next-to-last 
workman who also carries out his remaining FORWARD 4 and 
LEFT 10 tasks. This reverse process of finishing the last two tasks 
and relinquishing responsibility goes on until the original contractor 
finishes his original job with a single FORWARD 4 and LEFT 10, 
thus completing the left-hand circle in the LAZY8—GMK 


pected,an age-related trend in programming, with the fourth 
graders generally doing the most elaborate work-although 
many third graders, a few second graders, and a couple first 
graders have indeed produced sophisticated programs. 

A few children even acquired the skill of using 
subprocedures—i.e., breaking a complex program down into 
its several component parts. This is one of the most impor¬ 
tant features of procedural languages such as LOGO. Most 
students had discovered recursive programming, or "cur¬ 
sives” as a few called it. In recursive programs one of the 
program lines calls for a new stack to execute the program 
again. You do this by including the name of the program 
within the program itself. All the recursive programs writ¬ 
ten by the students, however, had the recursive step in the 
last line. [When the recursive step occurs in the last line be¬ 
fore END, the procedure is said to have "tail-end recursion.” 
For an example of somewhat more sophisticated usage, see 
the LAZY8 procedure in Figure 1—Ed.] 

A number of programs produced exciting video scenes. 
In EXPLODE, 32 differently colored balls splay out from 
the center of the screen to form a circle and then return 
back to the center before repeating the entire procedure. 
One third grader saw how he could place a program which 
printed a message inside of EXPLODE, and thus combined 
recursion and sub procedures. RAINBOW had one or more 
sprites continuously change colors for an attractive visual 
effect. There were also programs which had the TV monitor 
take on a series of sixteen colors, and programs which 
changed the background of the screen to black and created 
unusual perceptual illusions by shooting light-colored shapes 
across the screen. Some even had jets, rockets, or airplanes 
spouting fires from their engines. 

Other children wrote programs 
which put shapes together to create 
scenes, such as a home with a car 
driving down the street in front of 
the home. Most students had written 
utilitarian programs like VANISH 
(Figure 2) which caused the sprites 
to move off screen, take on the 
clear color, carry an empty shape, 
and which caused all the printing to 
be cleared from the screen. 

After spring break, several things happened which caused 
a quantum leap in the computer work of the students. First, 
the children were shown how to save their programs and 
shapes on cassette tape. Until then, the students had to 
write in their computer notebooks anything they wanted to 
save. That meant that any elaborate shape had to be repro¬ 
duced on a grid in an arduous manner, and long programs 


TO VANISH 
.CARRY: 

SETCOLOR <1::::: 
SETSPEED 0 
SETHEADING 0 





1 ; 


■ i!!' 
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or complex programs required a very long time typing. 
(Remember these children are elementary pupils with little 
typing experience before computers!). 

Students had not used much of their work as founda¬ 
tions for future work simply because loading the old ma- 


Figure 3. 


TO POLY DISTANCE ANGLE 

HIDETURTLE 

FORWARD cDISTANCE 

RIGHT :ANGLE 

POLY :DISTANCE :ANGLE 

END 



TELL TURTLE 
POLY 90 150 


1 —M .-i — i-.p- m i - 

.H 

Figure 4 


SC 15 HOME 

SC 15 HOME 

SC 15 HOME SH 270 

SC 6 HOME SH 270 


SC 15 HOME 
FD 16 

SC 15 HOME 
SC 15 HOME 

SH 0 FD 16 SH 270 FD 16 
TELL 8 CARRY 27 SC 15 HOME 
SH 0 FD 32 
SH 270 FD 16 

TELL 9 CARRY 4 SC 11 HOME 
Sll T80 FD 47 SH 90 FD 12 

* I "TELL' 10 CARRY 4 SC 8 HOME 

* * ’ : SH 0 FD -45 

' : SH 270 FD 23 
* : v ' TOLL [ 1 2 3 4 5 6 7 8] 
liH 90 SS 20 
.V-- TELL m SC, 1 
■-; 'END; 

: - ' . $ ^ 3 ^ ' . . 

. ■ ‘ TOFIRE ' Note : 

.. TELL*' 4 . : ' BG = BACKGROUND 

WATT 30 FD = FORWARD 

SC 0 SC = SETCOLOR , 

w ait ic cr> a ' ^ = SETHEADING 

FIRE 13 ° SS = SETSPEED 

END - 

Mole: 

Listings of Tl LOGO procedures are just that—listings of procedures. 
There's no way to print out a transcription of the data needed to 
MAKESHAPE and MAKECHAR as can be done with the HEX 
Codes in T( BASIC and Extended BASIC. The only way to show the 
graphics that a program contains is to show it as drawn on a series of 
"tiles" on the grids that appear on screen when the shapes and char¬ 
acters are first designed. This is similar to CHARDEF routine in 
Programming Aids 1. Space in this present issue doesn't permit these 
graphics to be shown. In future articles when Tl LOGO becomes 
generally available, we will reproduce the tiles associated with each 
program featured in the magazine. The listing of the Space Shuttle 
program was included (without the tiles) in this article to demon¬ 
strate the elegant simplicity of the language structure. — GMK 


Note : 

BG = BACKGROUND 
FD = FORWARD 
SC = SETCOLOR 
SH = SETHEADING 
SS = SETSPEED 


TO SHUTTLE 

■ ' TANK 

plane " 

Eire 

:END ■ ■ 

■ ■ A 

TO TANK 
TELL 1 CARRY 20 
SH 90 FD 16 
TELL 2 CARRY 21 
TELL 3 CARRY 22 
FD 16 

TELL 4 CARRY 23 

, *• • FD 32 : .. 


TO PLANE 
TELL 5 CARRY 24 
SH 0 FD 16 SH 90 
TELL 6 CARRY 25 
SH 0 FD 16 
TELL 7 CARRY 26 


terial took so much of their time. Now, with the recorders, 
they could use and improve each session’s programs just by 
taping and playing back a cassette. Also, they could design 
and SAVE complex shapes instead of seeing them lost when 
the computers were shut off. 

The children were also shown the TELL TURTLE mode. 
This opened up all of the turtle geometry features of LOGO. 
(Turtle geometry is such a powerful idea that some Pascal 
systems have adopted it.) This newly acquired mode, 
coupled with the previously learned SPRITE MODE, allowed 
the students to produce many interesting programs and 
visual effects. As a result of these new developments, many 
of the students soon exhibited a feeling of mastery over the 
computers. 

In the final eight weeks of school there was an exponen¬ 
tial explosion in the complexity of the students’ programs 
and in their ease with the machines. They quickly learned 
to use variables as inputs, and consequently “discovered” 
the famous turtle geometry POLYgon program which can 
generate any regular polygon. [See Figure 3] Then one 
student found that changing the angle of the turn on each 
recursion could produce beautiful patterns—including a 
striking nested curl in a star pattern. Many students now 
began putting programs together in subordinate and super¬ 
ordinate structures. Programs contained the unique LOGO 
controls of TEST, I FT, and IFF, as well as the conditionals 
IF... THEN . . . E LSE, plus BOTH and EITHER for con¬ 
junctive and disjunctive branching. One of the third graders 
wrote a CAI (Computer-Assisted Instruction) program to 
quiz his first grade friends on addition facts using these 
control commands! He then added visual displays of the 
addends, and encouraging remarks when a student made a 
mistake, or a colorful scene as a reward for the correct 
answer. 

Using combinations of several user-drawn shapes, stu¬ 
dents began constructing very elaborate composite pictures. 
One third grade student also discovered how to change the 
characters associated with each console key [by redesigning 
the characters on a grid “tile” with the MAKECHAR primi¬ 
tive— Ed.j, and decided to tease the teacher. She replaced 
the 3 with a 2, and then called a teacher over for a demon¬ 
stration. While instructing the computer to print 3 + 3 
(which now looked like a request for the sum of 2 + 2), she 
remarked to the teacher: “Look how dumb this computer 
is ... it doesn’t know 2 + 2.” 

The activity among the third grade students was exciting 
to witness. One began programming dramas in which text 
was printed at the bottom of the screen while the story was 
enacted in SPRITE and TELL TURTLE modes at the top 
of the screen. One other third grader was so intrigued by 
the space shuttle's landing that on the same afternoon of 
the landing, he began working on a shuttle program. First, 
he used MAKESHAPE to construct a faithful replica of the 
shuttle, complete with USA monogram, black-and-white 
coloring, and auxiliary rocket engines. Then he worked for 
part of the afternoon and a fittJe of the next morning to 
write and debug his programs. His final superprocedure 
launched the shuttle with flames shooting from the engines, 
jettisoned the auxiliary tanks, orbited the shuttle among 
planets in outer space, returned the shuttle to a dry lake-bed 
runway, taxied it to the end of the runway, and stopped it 
for a perfect landing. His programs are shown here in 
Figure 4. 

The gains made by the Lamplighter children with 
LOGO have indeed been impressive. They confirm Papert’s 
dictum [ Mindstorms , Semour Papert, Basic Book 1980] 
that children should program computers and not vice-versa. 


Mindstorms is available from the 99’er Bookstore. See 
Bookstore Section for additional information. 
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INTRODUCTION TO Tl BASIC 

By D. Inman, R. Zamora, and ft Albrecht, 

This comprehensive work, written by three of the fore¬ 
most microcomputing programming experts in the coun¬ 
try, will teach you all about computers and BASIC for use 
with the Texas Instruments Home Computer. Even if 
you’ve never worked with a computer, you can now teach 
yourself how to use, program and enjoy the Tl Home 
Computer with this entertaining, and easy-to-read work. 
The authors have carefully constructed this introduction 
so that you will soon be writing BASIC programs and ex¬ 
ploiting all of the excellent features of the Tl machines. Its 
14 chapters and Appendices cover all of the essential pro¬ 
gramming statements and machine features. 

CONTENTS: Gateway to Adventure. Do It Now: Sound 
and Color Graphics. Simple Programming. Looping 
Sound and Color. More Programming Power. Beginning 
Simulation. More Program Control Statements. Using 
Data Files. One Dimensional Arrays. Two Dimensions and 
Beyond. Color, Graphics, Sound, and Animation. More 
Strings Editing. Subroutines and Your Personal Library. 

paper. Si 0.95 
1980, 320 pages, 7'Ux9*U 



PROGRAMMING BASIC WITH THE 
Tl HOME COMPUTER 

By Herbert D. Peckham, 

A tutorial guide that helps you learn Tl BASIC in a 
friendly, relaxed manner. It goes beyond Beginner's 
BASIC furnished with the T1-99/4, and introduces 
the full range of Tl BASIC features including color 
graphics and sound. Its 11 chapters are written in a 
complete-the-blanks, programmed instruction format. 

paper, $10.95 
1979, 306 pages, 6x9 
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BASIC COMPUTER PROGRAMS 
FOR THE HOME 

By Charles D. Sternberg, 

The only book named in an update article in the Personal 
Business section of Business Week (June 23,1980)! 

An invaluable book at a great price, it contains over 75 
practical home application programs that will be helpful 
to the novice or experienced owner in increasing the use¬ 
fulness of any home computer. Each program is docu¬ 
mented with a description of its functions and operation, 
a listing in BASIC, a symbol table, sample data, and one or 
more samples. Programs included are: Home Financial 
Programs; Automobile Related Programs: Kitchen Help¬ 
mates; Scheduling Programs for Home Use; List Pro¬ 
grams for Every Purpose; Miscellaneous Programs for the 
Home; Tutorial Programs for Home Use; Conversion Pro¬ 
gram; and Hobbyist's Diaries. 

paper, $9.95 
1979, 338 pages, 7V» x 



GAME PLAYING WITH BASIC 

By Donald D. Spencer, Abacus Computer Corporation. 

Enjoy the challenge of competition with your computer. 
Amuse yourself with such games and puzzles as 3-D Tic- 
Tac-Toe. Nim, Roulette, Magic Squares, the 15 Puzzle, 
Baccarat, Knight’s Magic Tour, and many others. The 
writing is nontechnical, allowing almost anyone to under¬ 
stand computerized game playing. The book includes the 
rules of each game, how each game works, illustrative 
flowcharts, diagrams, and the output produced by each 
program The last chapter contains 26 games for reader 
solution 

paper, $9.55 
1977, 176 pages, 6x9, Ulus. 







































































BASIC COMPUTER PROGRAMS 
IN SCIENCE AND ENGINEERING 

By Jules H. Gilder. 

Save time and money with this collection of 114 ready-to- 
run BASIC programs for the hobbyist and engineer. There 
are programs to do such statistical operations as means, 
standard deviation averages, curve-fitting, and interpola¬ 
tion. There are programs that design antennas, filters, at¬ 
tenuators, matching networks, plotting, and histogram 
programs. There is even a justified typing program that 
can be used in typesetting. All programs in the book have 
been tested and are fairly universal; so you should have 
no difficulty running them on your system. You won’t find 
anywhere a more comprehensive collection of usable, 
ready-to-run BASIC programs! 

See also software section. 

paper, $9.95 
1980, 160 pages, 6x9, iltus. 



BASIC COMPUTER PROGRAMS FOR 
BUSINESS: VOL. 1 

By Charles D Sternberg. 

A must for small businesses utilizing micros as well as for 
entrepreneurs, these two volumes provide a wealth of 
practical business applications. Each program is docu¬ 
mented with a description of its functions and operation, 
a listing in BASIC, a symbol table, sample data, and one or 
more samples. 

Volume 1 contains over 35 programs covering: budg¬ 
ets, depreciation, cash flow, property comparisons, ac¬ 
counts payable, order entry, warehouse locations, inven¬ 
tory turnover analysis, job routing, resource allocation, 
production scheduling, etc. 

volume 1, paper, $ 10.95 (t) 
1980, 384 pages. 7 x 9% 



PRACTICAL BASIC PROGRAMS 

Edited by Lon Poole 

Here is a new collection of 40 programs you can easily key in and use 
on most microcomputers. Each program does something useful. Practi¬ 
cal BASIC Programs is especially useful in small business applications. It 
solves problems in finance, management decision, mathematics and 
statistics. It requires no prior programming knowledge. Each program is 
thoroughly documented. The book contains sample runs, practical 
problems, BASIC source listings, and an easy to follow narrative to help 
you realize the potential uses of each program. This book is a valuable 
reference for anyone who needs a wide range of useful programs: income 
averaging, present value of a tax shield, lease/buy decision, financial 
statement ratio analysis, checkbook reconciliation, home budgeting, 
nonlinear breakeven analysis. Program Evaluation and Review Technique 
(PERT), statistics, data forecasting divergence, musical transposition, 
Bayesian decision analysis, etc. paper $15.99 

1980, 200 pages, 8 V 2 x 11 


Use the order card in the back of this magazine, or itemize your order on a separate piece of paper and mail to: 
99'er Magazine/Book Dept., 2715 Terrace View Drive, Eugene, OR 97405. Be sure to include check or 
detailed credit card information. No. C.O.D. orders accepted. Add $1.50 postage & handling for 
1 book, $2.00 for 2 books, or $2,50 for 3 or more books. Please allow 4*6 weeks for delivery. 

If there is a question regarding your order please write to Customer Service at the above address. 
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HOME COMPUTERS CAN MAKE YOU RICH 

By Joe Weisbecker. 

Here's a valuable text for every home computer owner 
and nonowner interested in spare-time income opportun¬ 
ities. You'll be introduced to the microcomputer industry, 
and the types of people involved in it. You’ll find out how 
to learn more about this new industry. Discussed are 
basic principles of making money, freelance writing, pro¬ 
gramming, consulting, inventing, computer-made prod¬ 
ucts, investing, and much more. The goal of this book is 
to stimulate computer designers and microcomputer 
companies to direct more effort to the home computer 
market. 

CONTENTS: The Microcomputer Industry. What You 
Need to Know About Making Money. Resources You Can 
Use. Choosing Your Hardware. Writing for Money. Creat¬ 
ing and Selling Programs. Services for Sale. Use Your 
Imagination. Invent Your Way to Success. Making Your 
Money Grow. Working at Home. 

5177-8, paper, $6.50 
1980, 128pages, 6x9 


BEAT THE ODDS: MICROCOMPUTER 
SIMULATIONS OF CASINO GAMES 

By Hans Sagan. 

Here's an extremely useful programming guide that pro¬ 
vides realistic simulations of five popular Casino games: 
Trente-et-Quarante (Thirty and Forty), Roulette, Chemin- 
de-Fer. Craps, and Blackjack. Each of the five chapters 
has the same structure. It begins with a computer run, 
displaying facets of the programs, followed by an expla¬ 
nation of the objectives and the physical execution of the 
game. Acceptable bets and how to place them are dis¬ 
cussed and systems and/or strategies laid out. Finally, the 
computer program is developed and various modifica¬ 
tions of the program are detailed. 

Alf programs are written in BASIC and heavily REM’d 
for readability and conversion. A comprehensive bibliog¬ 
raphy, a glossary of French gambling terms and phrases, 
and hints on the discrepancies between BASIC dialects 
are included, as well as a summary of maxims of probabil¬ 
ity theory. 

5181-6, paper, $7.95(t) 
1980, 128 pages, 6x9 



MINDSTORMS: CHILDREN, COMPUTERS 
AND POWERFUL IDEAS 

By Seymour Papert 

The definitive work on the philosophy behind 
LOGO. Excerpted in the May/June issue of this 
magazine. hardcover, $12.95 

1980, 230 pages, 6x9 

TEACH YOUR BABY MATH 

By Glenn Doman 

The book upon which the Tiny Math I program 
(in the May/June issue of this magazine) is 
based. hardcover, $8.95 

1969, 110 pages, 6x9 



Use the order card in the back of this magazine, or itemize your order on a separate piece of paper and mail to: 
99'er Magazine/Book Dept., 2715 Terrace View Drive, Eugene, OR 97405. Be sure to include check or 
detailed credit card information. No. C.O.D. orders accepted. Add $1.50 postage & handling for 
1 book, $2.00 for 2 books, or $2.50 for 3 or more books. Please allow 4-6 weeks for delivery. 
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PRICES SUBJECT TO CHANGE WITHOUT NOTICE. 


68 99'er Magazine July /August 1981 










































































BEGINNER'S GUIDE FOR THE 
UCSD PASCAL SYSTEM 

By Kenneth Bowles 

This highly informative book is written by the 
originator of the UCSD Pascal System. It is designed 
as an orientation guide for learning to use the UCSD 
Pascal System, and features tutorial examples of pro¬ 
gramming tasks in the form of self-study quiz pro¬ 
grams. Once familiar with the system you will find 
the guide an invaluable reference tool for creating 
advanced applications. paper $11.95 

1980, 204 pages, 6x9 
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INTRODUCTION TO PASCAL 
UNCLUDING UCSD PASCAL) 

By Rodnay Zaks 

This is the first book on Pascal that can be used by 
persons who have never programmed before, but 
more generally it is a simple and comprehensive intro¬ 
duction to standard and UCSD Pascal for anyone- 
beginner to experienced programmer—who wants to 
learn the language rapidly. The logical progression 
and graduated exercises—designed to provide practice 
as well as test skill and comprehension—enable the 
reader to begin writing simple programs almost im¬ 
mediately. This book presents all concepts and tech¬ 
niques in a clear and simple style, making it accessible 
to beginners and useful to experienced programmers. 
All Pascal features are covered in detail, from basic 
definitions to complex data structures. An extensive 
appendix section presents a listing of all symbols, 
keywoods and rules of syntax for programming in 
Pascal, providing a concise summary and important 
reference tool. paper $14.95 

1981,440 pages, 7x9 


AN INTRODUCTION TO MICROCOMPUTERS - 
VOLUME O: THE BEGINNER'S BOOK 

By Adam Osborne 

Here's the book to start with if you know nothing 
about microcomputers but wish to Eeam about them. 
With the help of numerous illustrations and a 
wonderfully lighthearted text. Volume O will help 
giye you a sound understanding of the basics of 
microcomputing. You'll learn about the microcom¬ 
puter's construction, terminology, internal logic, and 


application. If you have plans to program microcom¬ 
puters, or if you must make decisions related to 
microcomputer applications. The Beginner's Book 
will provide the terminology and general concepts 
you'll need. This volume also provides an excellent 
background for the beginner wanting to go on to An 
Introduction to Microcomputers: Volume 1 — Basic 
Concepts. paper, $7.95 

1979, 240 pages, 5x8 


AN INTRODUCTION TO MICROCOMPUTERS - 
VOLUME 1 - BASIC CONCEPTS 

By Adam Osborne 

Using concepts that are common to all microprocessor 
systems. Volume 1 develops a detailed pictureof what 
a microcomputer can do, how it does what it does, 
and how the capabilities of microcomputers can best 
be applied. Basic Concepts presents the fundamental 
logic framework upon which microcomputer systems 
are built, so that the reader can evaluate the applic¬ 
ability of microcomputers to any practical prob em. 
This new revised edition incorporates all recent micro¬ 


processor developments. Concepts are discussed in 
terms of modern hardware configurations, and ex¬ 
amples of common applications are drawn from to¬ 
day's most popular devices. For example, the logic 
instructions and programming concepts of the new 
16-bit microprocessors are discussed in detail, and 
current logic distribution configurations are used 
throughout the text with numerous illustrations and 
examples. Programming mnemonics conform to the 
newly proposed IEEE standard. This is the first book 
in print to use them. paper, $12.99 

1980, 320 pages, 7x9 
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Home Secretary ... from p. 47 

820 CALL SOUND(200,800„4) 

S30 PRINT s *' ** WARNING ** MEMORY GETTING 

FULL “ : " (LSI ZE=" ; STR* (LSI ZE >&"/3S00) ": 

840 RETURN 

850 SC-4 

360 GOSUB 3060 

370 PRINT "PRESS"s:s"1 - TO ADD MORE 
DATA”:s"2 - TO ALTER THE DATA" 

BSO PRINT :”3 - TO DISPLAY THE 

DIRECTORY"::"4 - TO DISPLAY ONE ENTRY": 

870 PRINT :"5 - TO USE THE DATA"::”6 - TO 

STORE DATA FILE”:: "7 - FOR PRINTER LISTING":: 
700 PRINT ”6 - TO END PROGRAM" 

710 IF FLAG1=0 THEN 730 

920 PRINT ” *** UPDATE DIRECTORY ***" 

730 G0SU8 3120 
940 IF KEY<49 THEN 850 
950 IF KEY>56 THEN 850 
760 GOSUB 3060 

770 ON (KEY—48)GOSUB 770,1010.1430,1560,3150. 

2140,4280,4450 
980 RETURN 
990 GOSUB 430 
j 1000 RETURN 

1010 REM DATA ALTERATION 
1020 INPUT "WHICH ONE? ”sM* 

1030 IF M*=”"THEN 1410 

1040 PRINT ENTER"::" NEW DATA AT 

CURSOR. ’D' TO DELETE THE ITEM" 

'ENTER' FOR NO CHANGES": 

1050 GOSUB 1800 
1060 PR INT : : 

1070 FLAG1=1 
1080 TI*="? 

1070 I=M 

1100 GOSUB 770 

1110 T=-T 

1120 GOSUB 800 

1130 INPUT Alt CM) &TI *: IMP* 

1140 IF TMP*=”"THEN 1220 

115*0 if tmp*<>"D"then 1200 

1160 A1*CM)="_" 

1170 GOSUB 2410 
1150 N=N-1 
1190 RETURN 
1200 A1*CM)=TMP* 

1210 FLAG2=1 

1220 INPUT A2*CM)&TI*:TMP* 

123*0 IF TMP*=" "THEN 1250 
1240 A2*CM)=TMP* 

1250 INPUT A3*CM)kTI*:TMP* 

1260 IF TMP*=“"THEN 1280 
1270 A3*(M)=TMP* 

1280 INPUT A4* (M) S<TI*: TMP* 

1270 IF TMP*=“”THEN 1310 
1300 A4*(M)=TMP* 

1310 INPUT A5*CM)&TI*:TMP* 

1320 IF TMP*=""THEN 1340 
1330 A5*CM)=TMP* 

1340 GOSUB 770 

1350 IF T<192 THEN 1380 

1360 PRINT :"** REENTER LAST SET **" 

1370 GOSUB 1130 

1380 GOSUB 800 

1390 GOSUB 1650 

1400 ON T GOTO 1130,1020,1410 

1410 RETURN 

1420 REM DISPLAY ENTIRE DIRECTORY 

1430 IF FLAG2=0 THEN 1450 

1440 GOSUB 2410 

1450 FOR 1=1 TO N 

1460 M=29~LEN(A2*<I) ) 

1470 T*=STR*(I)V . " 

1450 PRINT TAB<4-LEN(T*));T*;Al*<I);TAB CM);A2*(I> 

1490 IF 1=20 THEN 1520 

1500 IF 1=40 THEN 1520 

1510 GOTO 1530 

1520 GOSUB 3100 

1530 NEXT I 

1540 GOSUB 3100 

1550 RETURN 

1560 REM SINGLE ITEM LISTING 
1570 INPUT "WHICH ONE? ": M* 

1580 IF M*= ,,M THEN 1640 

1590 GOSUB 1500 
1600 GOSUB 3060 

1610 PRINT A1* <M)::A2*<M)::A3*(M)::A4*CM) : :A5*(M) : : 

1620 GOSUB 1650 

1630 ON T GOTO 1600,1570,1640 

1640 RETURN 


1650 PRINT :"PRESS. E TO LIST UP":" X TO 

LIST DOWN”:" S TO SEARCH MORE” 

1660 GOSUB 3100 
1670 T=3 

1630 IF KEY069 THEN 1720 
1690 T=1 

1700 IF M=1 THEN 1780 
1710 M=M—1 

1720 IF KEY< >88 THEN 1760 
1730 T=1 

1740 IF M=N THEN 1780 
1750 M=M+1 

1760 IF KEYOB3 THEN 1780 
1770 T=2 
1780 RETURN 

1790 REM SEARCH ROUTINE FOR SINGLE ITEM LISTING 
1800 IF ABS(ASCCM*)-53)>4 THEN 1850 
1810 M=VAL(MS) 

1820 IF M<=N THEN 1840 

1830 M=N 

1840 RETURN 

1850 FOR 1=1 TO N 

1860 M=I 

1870 IF M*<=A1S <I)THEN 1890 

1330 NEXT I 

1890 RETURN 

1900 REM LOAD DATA 

1910 PRINT "ENTER"1. CS1"::"2. DSK1"::"3. OTHER 
1920 INPUT DEV 
1730 IF DEV< >1 THEN 1960 
1940 DEV*=”CS1" 

1950 GOTO 2010 

1960 IF DEV<>2 THEN 2000 

1970 INPUT "ENTER FILE NAME:":FIL* 

1980 DEV*="DSK1."&FIL* 

1990 GOTO 2010 

2000 INPUT "ENTER DEVICE NAME:":DEV* 

2010 OPEN #2:DEV*,INTERNAL,INPUT .FIXED 192 
2020 INPUT #2:OFT.N,FIL*,DATE*,LSIZE 
2030 IF DPT=1 THEN 2050 

2040 READ CAT* i 1> .CAT*<2> ,CAT*<3) ,CAT*C4) ,CAT*<5> 
2050 PRINT ::FILi::"LSIZE(3800)=";LSIZE::"LAST 
UPDATE: ";DATE*:: 

2060 FOR 1=1 TO N 

2070 INPUT #2:Al*■I).A2*(I).A3*(I).A4*(I),AS*(I) 
2080 NEXT I 

2090 IF DEV=I THEN 2120 
2100 FDR TD=1 TO 1000 
2110 NEXT TD 
2120 CLOSE #2 
2130 RETURN 

2140 REM SAVE DIRECTORY 
2150 IF FLAG2=0 THEN 2170 
2160 GOSUB 2410 
2170 PRINT "ENTER 1. CS1" 

2180 PRINT ” 2. DSK1" 

2190 PRINT ” 3, OTHER":::: 

2200 INPUT "YOUR CHOICE?":ANS 
2210 IF (ANS<1)+(ANS>3)THEN 2170 
2220 ON ANS GOTO 2230,2250,2310 
2230 PEV*="CS1" 

2240 GOTO 2320 

2250 INPUT “ENTER FILE NAME.NAM* 

2260 IF LEN(NAM*)<11 THEN 2270 

2270 PRINT "ENTER NO MORE THAN TEN LETTERS 

PLEASE.” 

2280 GOTO 2170 

2290 DEV*="DSKl.”&NAM* 

2300 GOTO 2320 

2310 INPUT "ENTER DEVICE NAME.”:DEV* 

2320 INPUT "ENTER DATE.":DATE* 

2330 OPEN #3:DEV*.INTERNAL,OUTPUT,FIXED 192 
2340 PRINT #3:OPT,N,FIL*,DATE*,LSIZE 
2350 FDR 1=1 TO N 

2360 PRINT #3:Al*(I),A2*<1),A3*(I),A4*(1),A5*(I) 

2370 NEXT I 

2380 CLOSE #3 

2390 FLAG1=0 

2400 RETURN 

2410 REM SORTING ROUTINE 
2420 FLAG2=0 

2430 CALL SOUND(100,800,6) 

2440 PRINT ***** SORTING DATA *****”::: 

2450 IF (N-l)THEN 2470 

2460 RETURN 

2470 FOR 1=1 TO N 

2480 NEXT I 

2490 N2=INT CN/2) 

2500 N21=N2+2 
2510 ICT=1 
2520 1=2 
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Goleta, CA 

See our complete line of personal 
and business computers including: 
Texas instruments, Atari, Apple, 
Altos, Data General. Also All ac¬ 
cessories, software and supplies* 
Plus atl that's new in personal 
electronics. Personal Electro- 
nics, 5674 Calle Real Center, 
Goleta, CA 93117, (805) 
967-5322. 


Los Angeles, CA 

A software/systems house primari¬ 
ly engaged in the sale of software 
for Tl and Polymorphic com¬ 
puters. Hardware sales are usually 
included in a combined turnkey 
package. Prospective customers are 
seen by prior telephone appoint¬ 
ment only. AAAA Discount 
Computer How’s, 13022 Pso- 
mas Way, Los Angeles, CA 
90066, (213) 391-8777. 


Waterloo, IA 

Texas Instruments Large selection 
of Accessories and Software for 
99/4 at Dheln’s True Value, 7 W, 
Airline Hwy, Waterloo, IA 50701. 
Sale prices at store are also gtven 
on mail orders, Writefor price list, 

Dhein’s True Value, 7 W. Air¬ 
line Highway, Waterloo, IA 
50701,(319) 232-6225. 

Evansville, IN 

Independent Register 2414 N. 
Governor (across from Town Cen¬ 
ter Mall) is the trl-state location 
for T 1*99/4 Hardware/Software, 
Supplies etc. We supply the tri¬ 
state with popular magazines and 
software for other units. Open 

Mon - Sat. 8 - 5 . Independent 
Register, 2414 N. Governor, 
Evansville, IN 4771 1. (812) 
424-8246. 


Lexington, KY 

A compfete line Texas Instruments 
dealer. We stock all Texas Instru¬ 
ments calculators and accessories, 
learning aids, home computer pro¬ 
ducts, accessories, peripherals and 
software. Atari computers and 
Hewlett Packard calculators in 
st rated, 198 

Moore Drive, Lexington, KY 
40503,(606) 276-1519. 


Marlow Heights, MD 

Specializing in Texas instruments 
99/4 computer and accessories. 
We have a large selection of Soft¬ 
ware for the TL99/4, TRS-SO, 
Apple t and Atari. We also stock 
Lobo Drives and Epson Printers. 

Wills Computer Store, 4410 
Stamp Road, Marlow Heights, 
MD 20031,(301) 423^525. 


Minneapolis, MN 

Authorized Texas Instruments 
TI-99/4 computer dealer offering 
you the best prices in the U.5.A, 
on the computer and all peripher¬ 
als, Also, a wide variety of printers. 
CRT’s available at lowest prices. 
No collect calls, please. Calcu- 

lators, Inc., 7409 Fremont 
Avenue South, Minneapolis, 
MN 55423,(612) 866-8908. 


Great Falls, MT 

We've got the best prices because 
we want your business. Complete 
line of TI products and Epson 
printers. Monthly SALES on alf 
items. Call now or write: I RCA 

Inc., N.E. Bypass Hwy. 87, 
P. O. Box 6125, Great Falls, 
MT 59406, (406) 727-8835. 


Dayton, OH 

The only full line Tl distributor 
stocking Semiconductors, DSG 
{700-800 OMNI Products) TM990 
Microcomputer Boards, Calcula* 
tors, complete In depth Inventory 
including 99/4 Products-Software* 
Ohio 1-800-752-9510. Surround¬ 
ing ar-ea 1 -800-543^95 5qCL WrW 'Strip, 
Can us. Esco Inc,, P. O- Box 
1166, 221 Crane St* Dayton, 
OH 45403, (513) 226-1133 


Salem, OR 

J, Harvey’s Video Clubhouse 
VCR’s, Tapes, Home Computers 
TI-99/4, Atari 400, 800. 

J. Harvey’s Video Clubhouse 
3295 Triangle Drive #142, 
Salem, OR 97302, (503) 

581-1003. 


New York, NY 

"Your Personal Guide to Personal 
Technology." We carry the com¬ 
plete TI-99/4 System. For demon¬ 
stration of the TI-99/4 at home, 
school or office, or more informa¬ 
tion call Next Tech, Inc. today. 

Next Tech, Inc., 350 Fifth 
Avenue, Suite 3308 New 
York, NY 10001, (212) 792- 
8768. 


Call a Dealer Today 


Olean, NY 

Texas Instruments TI-99/4 Home 
Computer Systems, software, 
hardware, and accessories at 
discount prices. APF-Imagination 
Machine. Video Sales and Service. 

BLOISE Electronics, 114 Cen¬ 
ter Street, Olean, NY 14760* 
(7*6) 372-80*3. 

Rye, NY 

Wide assortment of Tl software, 
hardware and accessories all at 
discount prices. Also authorized 
Scott, Foresman dealer. Write or 
phone for nine-page catalog with 
hundreds of items. Microcom- 
puters Corporation, P.O.Box 
191, Rye, NY 10580, (914) 
967-8370. _ 

Electric City, WA 

Texas Instruments 99/4 Home 
Computer Systems — Wholesale 
prices and not on just the main 
console! Also good prices on 
Epson printers and Televideo 
Terminals. For price list, write to: 

Komputar Works, P.O.Box 
483, Electric City,WA 99123, 
(509) 633-2653. 

Green Bay, Wl 

We specialize in the Texas Instru¬ 
ments 99/4 computer. We handle 
a complete accessory line for it, at 
discount prices. Custom program¬ 
ming for the 99/4also done. Write 
for a complete price list. The 

Micro House, 527 Simonet 
Street, Green Bay,WI 54301, 
(414) 432-2871. 


Dealers: 

Listings are $25 per issue; minimum insertion, 3 issues (6 months). 
Prepayment of $75 required. Ads include 35 words describing products 
and services, plus company name, address and phone. (No merchandise 
prices, please.) Call Pat at 503-485-8796 or write 99’er Magazine, Ad 
Department, 2715 Terrace View Drive,’Eugene, O R 97405, 


ATTENTION TI DEALERS 

Did You Know That You Can Be Reimbursed 
For Advertising Texas Instruments Products 

In This Magazine? 


Call or Write 

Our Ad Department Today! 


99’er Magazine / Ad. Dept 
2715 Terrace View Drive 
Eugene, Oregon 97405 
(503) 485-8796 
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Local Networking 

with Shared Peripherals 

The TI-99/4 at 

North Texas State University 


By Dr. Kathleen M. Swigger 

Department of Computer Sciences, NT Box 13886 
North Texas State University, Denton, TX 76203 


T he Computer Sciences Department at North Texas 
State University has been noted for its research and 
educational utilization of microcomputers. Efforts 
began in the early 1970s with the school's fabrication of 
Motorola-based systems for assembly language programm¬ 
ing. In the fall of 1980, North Texas installed twenty-five 
TI-99/4 systems. These systems are currently being used for 
both student programming projects and faculty research. 

The enrollment in the Computer Sciences Department 
now numbers over 750 majors, making North Texas one of 
the largest departments of its kind in the country. By requir¬ 
ing all introductory students to complete their programming 
assignments on a TI-99/4, rather than on a larger machine, 
North Texas is able to handle its already large (and steadily 
increasing) enrollment. Making the microcomputer an inte¬ 
gral part of the computer sciences curriculum has several 
educational advantages: First, students learn to use a sys¬ 
tem that is readily accessible to them at school, in the 
home, and in a business. The ease of using the smaller sys¬ 
tems enable students to begin their coursework with a 
healthy, positive feeling about computers. Additionally, the 
ability to play music, use graphics and even create speech, 
provides students with both challenging and enjoyable pro¬ 
gramming assignments. Finally, since microcomputers are 
"total” computer systems, students therefore learn and 
more fully understand basic computer concepts such as 
storage, memory, input, and output. 

Another successful project that NTSU has recently com¬ 
pleted is the networking of several T!-99/4s, allowing mul¬ 
tiple access to a single disk and printer. The system was de¬ 
signed mainly for educational environments that operate 
within limited budgets. An increasing number of educational 


institutions at all levels {elementary, secondary, and col¬ 
lege) are interested in acquiring microcomputers. But these 
schools need to find systems that allow for disk input, pro¬ 
vide printed output for teacher grading and analysis, and 
cost as little as possible. In a school environment, disk 
storage and access is not an on-line problem. Both teachers 
and students need to load and store programs, but they 
generally do not have to gain continual access to datafiles 
on disk. Therefore, a networking system like the one im¬ 
plemented at North Texas should solve many of the critical 
problems facing school officials. 

The NTSU networking system includes the equipment 
necessary to connect up to sixteen "slave terminals” to a 
"master computer.” The hardware for the network consists 
of three major parts: (1) a master control box, (2) a slave 
control box, and (3) a network bus cable. The master con¬ 
trol box houses a power switch and LED hex display that 
tells users which terminal is being accessed, as well as the 
network bus cable connection to the slaves. The slave con¬ 
trol box houses a toggle switch, two single LEDs, cable 
connections to the slave computers, and a cable connection 
to the network bus. Finally, the network bus cable consists 
of a cable with up to seventeen 9-pin male connectors that 
can be connected to the master control box. With this sys¬ 
tem, students can obtain a hard copy listing of their pro¬ 
grams by merely sending their programs from the slave 
computer to the master computer. The master system, con¬ 
sisting of a floppy disk and printer, handles the necessary 
input/output. 

The Computer Sciences Department at NTSU has found 
the TI-99/4 network to be an easy-to-use educational sys¬ 
tem, and plans to continue using the small microcomputers 
as tools for teaching programming languages and as instru¬ 
ments for educational research. It has saved the department 
extensive duplication and the expense of purchasing addi¬ 
tional I/O equipment. HHI 
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Business.. . from p. 24 

is the same under lease or purchase. You 
expect that after three years you would 
need to trade in this one on a larger mo¬ 
del, If you buy it, the trade-in allowance 
will be $6000, Assuming that either 
depreciation or lease payments would 
cost a net of only 60% of the actual 
amounts because of an assumed 40% tax 
rate, the input to the program would 
therefore be 



(a) 

(b) 

1(c) 

(d) 

1st Component 

12000 

0 

1 

1 

2nd Component 

-1200 

12 

12 

3 

3rd Component 

-180 

0 

1 

36 

4th Component 

-6000 

36 

1 

1 


If you want to check, this example gives 
an effective interest rate of about 14.1 %. 
Presumably, if money costs you less 
than 14.1%, it would be advantageous 
to purchase the widget grinder instead 
of leasing it. 


Effective I nterest Rate Program: 

Table of Variables 

Arrays: 

A1: amount of each payment in an in¬ 
vestment component* 

T1: time at which the first payment of 
that component is made (in months, 
from current time = 0) 

FI: number of months between the 
payments in this component 

N1: number of payments in this 
component 

ale 

An investment component is a series of one 
or more equal payments made at fixed in¬ 
tervals. Payments may be paid out (+) or 
received (—). 

Parameters: 

U9: upper limit for effective annual rate 

L9: lower limit for effective annual rate 

T9: tolerance: when the interval be¬ 
tween upper and lower limits (LI, 
Ul) is less than this, the program 
stops 

U9: tolerance: when the residual present 
value at a trial interest rate, divided 


by the sum of the absolute values 
of all components, is less than this, 
the program stops 
C: number of components 

I: index of the current investment 
component under consideration 
(always goes from 1 to C) 

LI: current lower bound on effective 
rate 

Ul: current upper bound on effective 
rate 

R: trial interest rate, on which to cal¬ 
culate residual present value V 

V: residual present value, based on 
trial interest rate R 

L2: resudual present value at lower 
limit LI 

U2: residual present value at upper 
limit Ul 

V3: sum of absolute values of compo¬ 
nent present values 

V4: present value of a component at 
rate R 

V5: temporary variable used in 
computing V4 

R1: monthly increase factor, using 
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100 REM XXXXXXXttXXXXXXXXXXXXXtXXXX 

110 REM * EFFECTIVE INTEREST RATE * 

120 REM t AND S 

130 REM * RETURN ON INVESTMENT * 

140 REM XXXXXXXXXXXXXXXXXXXXXXXXXXX 

150 REM 99"ER VERSION 7.91.1 

160 REM BY SEORGE STRUBLE 

170 REM 

180 REM 

190 DIM A1(10),T1(10),F1tlO),N1(10) 

200 U9=30.0 

210 L9=0 

220 T9=O,05 

230 P9-1.0E-4 

240 REM ACCEPT INPUT 

250 PRINT "ENTER NUMBER OF PAYMENT COMPONENTS"* 

260 INPUT C 

270 FOR 1 = 1 TO C 
280 PRINT 


290 PRINT "ENTER AMOUNT OF PAYMENT"; 

300 INPUT Alfl) 

310 PRINT "ENTER TIME OF FIRST OF THESE 

PAYMENTS"; 

320 INPUT Tim 

330 PRINT "ENTER PERIOD BETWEEN THESE PAYMENTS, 
IN MONTHS"; 

340 INPUT FI(I) 

350 PRINT "ENTER NUMBER OF THESE PAYMENTS"; 

360 INPUT N1(I) 

370 NEXT I 
380 PRINT 

390 REM SET LDWER St UPPER BOUNDS FOR EFFECTIVE 
RATE 

400 L1=L9 
410 Ul=U9 


L 


420 REM GET RESIDUAL 
430 R=L1 
440 SOSUB 720 
450 L2=V 


VALUE AT LOWER BOUND 


460 IF ABS <V7V3)<P9 THEN 930 

470 REM GET RESIDUAL VALUE AT UPPER BOUND 
480 R=U1 

490 GOSUB 720 
500 U2-V 

510 IF ABS(V/V3)<P9 THEN 930 

520 REM RESIDUAL VALUES MUST HAVE OPPOSITE SIGNS 
AT THE BOUNDS 
530 IF U2*L2<O THEN 590 

540 PRINT "EFFECTIVE' RATE NOT BETWEEN , *:L9;" AND “; U9 
550 PRINT "CHECK YOUR INPUT OR CHANGE BOUNDS L9 
AND U9" 

560 GOTO 950 

570 REM INTERPOLATE BETWEEN LOWER & UPPER BOUNDS 
580 REM FOR NEW TRIAL RATE R 
590 R= (LHU2-U1 »L2> / (U2-L2) 

600 GOSUB 720 

610 IF ABS(V/V3 J <P9 THEN 930 

620 REM TRIAL RATE REPLACES WHICHEVER BOUND HAS 
RESIDUAL VALUE WITH THE SAME SIGN 
*30 IF VtL2>0 THEN 670 
640 U1=R 
650 U2=V 
660 GOTO 690 
670 L1=R 
680 L2=V 

690 IF Ul—L1<T9 THEN 930 
700 GOTO 590 

710 REM SUBROUTINE TO COMPUTE RESIDUAL VALUE V AT 
RATE R 
720 V=0 
730 V3=0 

740 FOR 1=1 TO C 

750 IF N1(I)>1 THEN 790 

760 REM COMPUTE RESIDUAL VALUE IF ONLY ONE PAYMENT 
770 V4=<l+R/1200>~<-Tl(I))*A1(I) 

780 GOTO 880 

790 IF ROO THEN B40 

800 REM SPECIAL CASE WHEN R=C 

810 V4=N1(I)*A1(I) 

820 GOTO 880 

830 REM COMPUTE RESIDUAL VALUE OF SERIES OF PAYMENTS 
840 Rl=l+R/1200 

850 V5=(l-Rl'-<-Nl (II *F1 (I) > >/<l-Rl'M-Fl (I) ) > 

860 V4=A1<I)*R1 A (-T1(I))*V5 

870 REM IN ALL CASES. INCLUDE V4 IN V AND V3 
880 V=V+V4 

890 V3=V3+ABS<V4> 

900 NEXT I 

910 PRINT "RESIDUAL PRESENT VALUE AT ";R;"7. IS - - v 
920 RETURN 
930 PRINT 

940 PRINT "EFFECTIVE INTEREST RATE. COMPOUNDED 
MONTHLY, IS ";R 
950 END 
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Attention 



Receive Hundreds of Classified Ads 

Like These Every Month 



COMPUTER SHOPPER, the new buy, sell, and trade 
publication, is ready to help you with the latest infor¬ 
mation on personal, small business and large-system 
computers, accessories and software. 

Each ad-packed issue is full of bargains you are 
looking for. Included are ads from individuals 
throughout the United States who are selling their 
good, pre-owned equipment just so they can trade-up 
to new equipment coming on the market. 

But, COMPUTER SHOPPER'S bargains won’t be 
yours unless you subscribe. This useful, money¬ 
saving publication can become your way to com¬ 
municate with other buyers, sellers, and traders all over the nation. 

Whether you are a hobbyist or a part-time user, COMPUTER 
SHOPPER will put you in touch with the nationwide computer 
marketplace in time for you to take advantage of bargain oppor¬ 
tunities. 

Have something to sell? A COMPUTER SHOPPER subscriber pro¬ 
bably wants to buy it. 

Looking for a part, component or even a complete system? A 
COMPUTER SHOPPER subscriber probably wants to sell it. 

COMPUTER SHOPPER is THE marketplace for anything in com¬ 
puters and is read by thousands of people who are ready to buy. 

COMPUTER SHOPPER offers a unique format in which classified 
ads are categorized for fast location of specific items. Combining 
this with low individual ad rates — 10 cents a word — 


makes it the ideal place for buyers and sellers to com¬ 
municate. And, its mix of individual, dealer, and 
manufacturer ads enable subscribers to find what 
they want at the best price possible. 

COMPUTER SHOPPER will work for you in other 
ways, too. If you are just thinking about getting into 
computers, it can help you learn product availability 
and prices before you make a decision. And, through 
the timely ads, COMPUTER SHOPPER will keep you 
abreast of changes in the market which could create 
bargain opportunities for you. 

But COMPUTER SHOPPER cannot work for you 
unless you subscribe. Complete the subscription form today and 
put COMPUTER SHOPPER on your monthly reading list. 

Yes, l Want To Get The Best Deal! Enter my subscription to the worldwide computer C 
equipment & software publication, COMPUTER SHOPPER, today. If I'm not 100% f 
satisfied with my first issue, my money will be refunded in full But I keep that first 
issue. It s my FREE sample. * 

Mail my 13 issues (12 regular issues, plus 1 FREE sample) [ 

C Bulk Rate at $10.00 a year i 

Name_ ■ 

1 

I Address_ J 

| City_State_._Zip___ * 

CHARGE TO MY:G MASTERCHARGE. □ VISA | 

Card#_„_._._„__ * 

< 

M/C, Interbank #_Exp Date_ I 




The Nationwide Marketplace for Computer Equipment 

CamPUTSR ShlORRSR 


P. O. Box FI08 • Titusville, Florida 32780 
Telephone 305-269-3211 


For faster service, MasterCard & VISA subscriptions only, call TOLL FREE 1-800-528-6050, Ext. 184 
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Civil Engineering ... from p. 63 


2610-2860 

2870-2930 

2940-2960 

2970 

2980-3070 

3080-3090 
3100-3410 

3420-3470 


3480-3510 

3520 

3530-3550 

3560-3640 

3650 

3660-3680 

3690-3890 

3900-3910 

3920-3980 

39904120 

41304220 

4230 

42404260 

4270-4300, 

4340-4370 

43104330 

4380 

43904450 

44604640 

46504850 

48604930 

49404980 

4990 

5000-5300 


Gives instructions and. illustration for solving 
this type of loading. 

Writes a problem for the student to solve. 
Draws and labels a beam with a uniform load. 
Asks for student’s answers. 

Solves for the reactions and compares answers. 
Prints appropriate remarks. 

Chooses another problem. 

Solves example problem of uniform load on 
beam that is between two points on the beam. 
Writes problem for uniform load between two 
points on the beam and solves intermediate 
steps. 

Draws and labels the beam for uniform load. 
Asks for student’s answers. 

Calculates solution. 

Corrects student’s input. 

If the answer is incorrect another problem is 
given. 

If the problem is correct, asks the student if 
he wants more problems. 

Student enters his own problem. 

Solves and checks the problem. 

Gives instructions to solve for combination 
loads. 

Writes the problem for combination loads. 
Draws and labels the beam for combination 
loads. 

Asks for student’s answers. 

Solves for reactions. 

Checks student’s answers. 

If the solution was correct, asks the student 
if he wants more problems. 

If the solution was incorrect, does another of 
the same type problem. 

Instructions for entering problems. 

Draws and labels a general beam. 

Asks for student’s problem. 

Solves the problem and prints the reaction 
forces. 

Asks if there is another problem. 

END. 

Prints the menu screen of the choices of the 
types of loading for the simple beams. 


Subroutines 

5310-5360 

5370-5520 

5530-5550 
5560-5580 
5590-5620 
5630-5680 
5690-5770 
5780-5800 
5810-5840 
5850-5940 
5950-6030 
6040-6100 
6110-6180 

6190-6240 

6250-6280 

6290-6360 

6370-6410 

6420-6490 

6500-6600 

6610-6650 

6660-6720 

6730-6770 


Prints error message for length input. 

Draws basic beam, supports, and reaction 
forces. 

Delay subroutine. 

Prints concentrated load, P. 

Subroutine for “Press enter to continue”. 
Writes problem, length of beam. 

Prints concentrated load in problem. 

Prints uniform load in problem. 

Prints final statements of problem. 

Labels concentrated load, P. 

Labels length L of beam. 

PrintsXM = 0 equation. 

Shows solution of concentrated load reactions 
by summing the moments about end A. 

Shows solution of A from sum of forces. 

Asks for student’s answers. 

Prints options at the end of each major sec¬ 
tion. 

Draws uniform load for a width Z from Y. 
Draws and labels beam with uniform load. 
Labels uniform load, W. 

Writes problem for uniform load between two 
points on the beam. 

Randomly sets values for problem with uni¬ 
form load between LI and L2. 

Intermediate algebraic solutions for problems 
with uniform load; Y and Z are used to draw 
the beam. 


680 GOSUB 5530 

690 GOTO 5000 

700 CALL CLEAR 

710 PRINT “NEWTON’S LAWS" 

720 PRINT "ARE NECESSARY TO" 

730 PRINT “SOLVE REACTION PROBLEMS.“:j 
740 PRINT "1. EQUILIBRIUM OF FORCES" 

750 PRINT " SUM OF FORCES =0" 

760 PRINT '* SUM OF MOMENTS a Q" 

770 PRINT s“2. FORCES ALWAYS OCCUR IN" 
7BO PRINT “ PAIRS OF EQUAL AND" 

790 PRINT ’* OPPOSITE FORCES; " 

800 PRINT “ ACTION = REACTION"jss 
SIO SOSUB 5590 
B20 CALL CLEAR 

830 PRINT "TO SOLVE A PROBLEM:"ss 
840 PRINT “DRAW AND LABEL THE PROBLEM." 
850 PRINT s’WITH 2 UNKNOWN REACTIONS," 
860 PRINT “SOLVE 2 EQUATIONSi“ss 
870 PRINT ” SUM OF MOMENTS a O" 

SSO PRINT “ SUM OF FORCES = 0“ 

890 PRINT s“USE CORRECT UNITS."::: 

900 GOSUB 5590 

910 IF CHOICE=2 THEN 1720 

920 CALL CLEAR 

930 PRINT “PROBLEM:” 

940 PRINT ::“GIVEN A SIMPLE BEAM" 

950 PRINT “SUPPORTED AT THE ENDS.” 

960 PRINT :"IT IS LENGTH L." 

970 PRINT :“A CONCENTRATED LOAD P" 

980 PRINT "IS AT THE CENTER." 

990 PRINT IGNORE WEIGHT OF THE BEAM." 
lOOO GOSUB 5810 
1010 1=16 
1020 GOSUB 5370 
1030 CALL HCHAR<1 + 1, 12,76) 

1040 J=16 

1050 GOSUB 5560 

1060 CALL HCHAR(I-5,16,80) 

1070 GOSUB 6040 

1080 PRINT "TAKING MOMENTS AT A,'*: 

1090 PRINT "P«L/2 - B*L = O" 

IlOO PRINT " B*L = P*L/2" 

1110 PRINT TAB (11); ,f B = P/2“: 

1120 PRINT :"NOW TAKE SUM OF FORCES=0" 

1130 GOSUB 5590 

1140 PRINT "A + B - P = O" 

1150 PRINT " A + B = P“ 

1160 PRINT '* a=»P-B = P- P/2" 

1170 PRINT TAB(9);“A = P/2" 

1180 GOSUB 5590 
1190 GOSUB 5370 
1200 CALL HCHAR<1+1,12,76) 

1210 GOSUB 5560 

1220 CALL HCHAR <11,16,80) 

1230 FOR Y=4 TO 26 STEP 22 
1240 CALL HCHAR<22,Y,80) 

1250 CALL HCHAR <22,Y+l, 47) 

1260 CALL HCHAR<22,Y+2,SO) 

1270 NEXT Y 

1280 PRINT "IF THE CONCENTRATED LOAD" 

1290 PRINT "IS IN THE CENTER," 

1300 PRINT “A = B = P/2":s 

1310 PRINT "FOR EXAMPLE, IF P=10O0 LBS.," 

1320 PRINT " A=50O LBS, AND 8=500 LBS." 

1330 GOSUB 5590 

1340 RANDOMIZE 

1350 EX=2 

1360 PP=100» UNT (20*RND) +1 ) 

1370 LL=INT<6*RND)+10 

1380 GOSUB 5630 

1390 GOSUB 5690 

1400 GOSUB 5810 

1410 GOSUB 5370 

1420 GOSUB 5560 

1430 GOSUB 5850 

1440 GOSUB 5950 

1450 GOSUB 6250 

1460 IF AOPP/2 THEN 1510 

1470 IF BOPP/2 THEN 1510 

1480 PRINT ::"*** CORRECT!! ***" 

1490 GOSUB 5590 
1500 GOTO 1560 

1510 PRINT :“SORRY, THE REACTIONS ARE" 

1520 PRINT :“A a";PP/2 

1530 PRINT “B =*'; PP/2 

1540 GOSUB 5590 

1550 GOTO 1570 

1560 IF EX>2 THEN 1590 


_ Continued on p. 80 
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TM 



LINE VOLTAGE 
TRANSIENT CLIPPING 


Features Parallel Operation 
PROTECTS: 

•Computers 

•Microcomputer Systems 
•Word Processors 
•Cash Registers 
•Power Supplies 


l 

D 


ARC 


INDUSTRIES, INC. 


5000 Hits/Second 
PROTECTS AGAINST: 

•High Energy Voltage 
Transients 
•On-Off Switching 
•Lightning Induced Transients 
• Inrush of On/Off Power 


TRANSIENT VOLTAGE 
SURGE SUPPRESSOR LISTED 




Da«l«r InquIriM invited. 


7133 Rutherford Rd. Baltimore. Md. 21207 
(301)298-3130 800-638-9098 ^ 


The two finest programs 
for the TI99/4* 


Santa Paravia 
and Fiumaccio 

The year is A.D. 1400, and you are the 
ruler of a tiny Italian city-state. You are 
ambitious by nature and intend to build 
your little city-state into a powerful king¬ 
dom. 

So begins Santa Paravia and Fiumac¬ 
cio, where you and your fellow players 
compete as rulers of neighboring cities. 
You control the grain harvest, feed your 
people, set tax rates, exercise justice, and 
invest in public works. 

Life was short back then, and you’ll 
have only a limited amount of time in 
which to build your kingdom. The lives of 
your serfs will depend on your decisions. 
If they are wise, then your city-state will 
grow and you will acquire loftier titles. If 
your rule is incompetent, your people will 
starve and your city-state may be invaded 
by your neighbors. 

How will you rule your kingdom? Will 
you become unscrupulous and follow the 
example set by Niccolo Machiavelli in his 
book on government, The Prince—or will 
you be a benevolent ruler—an iron Fist in 
a velvet glove? Only you can answer that 
question—with the Santa Paravia and 
Fiumaccio program. For T199/4 Micro¬ 
computers, 

No. 0273TI $9.95. 


Airmail Pilot 

Let the Airmail Pilot package take you 
to the early days of aviation history. Your 
plane is the Curtis JN4-D, affectionately 
known as the Jenny. You must fly the 
mail from Columbus to Chicago. 

The Jenny carries only 26 gallons of 
fuel. You’ll have to stop along the way. 
Bad weather may force you down. Elec¬ 
trical storms may turn your aircraft into a 
mass of flaming wreckage, or ice may 
form on your wings and plunge you to 
certain death below. But, the mail must 
get through. 

Experience the thrills of flying, when 
aircraft were mere fragile machines of 
wood and fabric, with the Airmail Pilot 
package. (Scarf and flying helmet option¬ 
al.) All you need is your T199/4 micro 
computer. 

No, 0274TI $9.95. 


TO ORDER: 

See your local Instant 
Software dealer or call 
Toll-Free 
1 - 800 - 258-5473 

* A trademark of Texas Instruments 


Inslant Software 3” 
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1570 EX=EX+1 

15SO GOTO 1360 

1590 GOSUB 6290 

1600 IF KEY=49 THEN 1360 

1610 IF KEY=51 THEN 5000 

1620 1=16 

1630 J=16 

1640 GOSUB 5370 

1650 GOSUB 5560 

1660 CALL HCHAR(1+1,12,76) 

1670 CALL HCHAR(1-5,16,80) 

1680 INPUT "LENGTH OF BEAM = 

1690 GOSUB 5310 

1700 INPUT "LOAD P = "tPP 

1710 GOTO 1410 

1720 CALL CLEAR 


1730 PRINT "GIVEN A BEAM OF LENGTH L“ 

1740 PRINT "SUPPORTED AT ENDS A AND B." 

1750 PRINT "A CONCENTRATED FORCE OF" 

1760 PRINT "P POUNDS IS APPLIED" 

1770 PRINT "D FEET FROM A. IGNORE" 

17B0 PRINT "THE WEIGHT OF THE BEAM.“ss! 

1790 GOSUB 5810 

1800 1=16 

1810 J=12 

1820 D=5 

1830 GOSUB 5370 

1S40 GOSUB 5560 

1850 CALL HCHAR(1-5,J,80) 

1360 CALL HCHAR(I-1,9,68) 

1870 CALL HCHAR(1+1,16,76) 

1880 GOSUB 6040 

1890 PRINT i"TAKING MOMENTS AT A" 

1900 PRINT :"P*D - B*L = 0“ 

1910 PRINT TAB(7) j"B*L = P*D" 

1920 PRINT TAB(9);"B = P*D/L" 

1930 PRINT j ’NEXT SUM FORCES = 0“ 

1940 GOSUB 5590 

1950 PRINT :"A + B - P = 0“ 

1960 PRINT " A = P-B = P - P*D/L“ 

1970 GOSUB 5590 
1980 RANDOMIZE 
1990 EX=2 

2000 PP=100*(INT(20*RND)+1) 

2010 LL=INT(6*RND)+10 
2020 D=INT <10*RND)+1 
2030 GOSUB 5630 
2040 GOSUB 5690 
2050 GOSUB 5810 
2060 GOSUB 5370 
2070 J=INT(D/LL*21)+5 
2080 GOSUB 5560 
2090 GOSUB 5850 
2100 GOSUB 5950 
2110 DD*=STR«(D) 

2120 FOR E=1 TO LENCDD*) 

2130 EE=J—5 

2140 CALL HCHAR(I-1.EE+E,ASC(SEG*(DD*,E,1))) 
2150 NEXT E 

2160 CALL HCHAR(I-1,EE+E,39) 

2170 BB=PP*D/LL+.005 
2180 BB=1E—2*(INT(BB81E2)) 

2190 AA=PP-BB 

2200 IF EX=2 THEN 2250 

2210 GOSUB 6250 

2220 IF AAOA THEN 2240 

2230 IF BB=B THEN 2300 

2240 PRINT :“OUR ANSWERS DON'T AGREE."is 

2250 GOSUB 6040 

2260 GOSUB 6110 

2270 GOSUB 6190 

2280 EX=3 

2290 GOTO 2000 

2300 PRINT sYOU ARE CORRECT **" 

2310 GOSUB 5590 

2320 EX=EX+1 

2330 IF EX<4 THEN 2000 

2340 GOSUB 6290 

2350 IF KEY=49 THEN 2000 

2360 IF KEY=51 THEN 5000 

2370 CALL CLEAR 

2380 1=16 

2390 J=12 

2400 GOSUB 5370 

2410 GOSUB 5560 

2420 CALL HCHAR <1-5,J,SO) 

2430 CALL HCHAR(I-1,9,68) 

2440 CALL HCHAR(I+1,16,76) 

2450 INPUT “LENGTH OF BEAM = “iLL 
2460 GOSUB 5310 


V ■ 









Civil Engineering ... 

2470 INPUT "LOAD P * "sPP 

2480 INPUT “DISTANCE FROM A * "aD 

2490 IF D>LL THEN 2510 

2500 IF D>*0 THEN 2530 

2510 PRINT i“SORRY, O <= D <= L"i! 

2520 GOTO 2480 
2530 GOTO 2060 
2540 CALL CLEAR 

2550 PRINT “GIVEN A SIMPLE BEAM- 
2560 PRINT -SUPPORTED AT THE ENDS.’* 

2570 PRINT “IT IS LENGTH L." 

2580 PRINT “THERE IS A UNIFORM LOAD" 

2590 PRINT “OF W POUNDS PER FOOT.“ 

2600 GOSUB 5810 
2610 CALL CLEAR 

2620 PRINT "A UNIFORM LOAD CAN BE” 

2630 PRINT "THOUGHT OF AS AN" 

2640 PRINT "EQUIVALENT RESULTANT- 
2650 PRINT “LOAD ACTING AT THE" 

2660 PRINT “CENTROID OF THE LOADING M ss:ssj::s: 
2670 CALL HCHARC21,5, 112,7) 

2680 CALL HCHAR(20,7,07) 

2690 CALL HCHAR(20,8,47) 

2700 CALL HCHAR(20,9,76) 

2710 CALL HCHAR(22,8,76) 

2720 CALL HCHAR<21,15,61) 

2730 CALL HCHAR(22,19,115,7) 

2740 1=22 

2750 J=22 

2760 GOSUB 5560 

2770 CALL HCHAR(18,21,87) 

2780 CALL HCHAR(21,23,76) 

2790 CALL HCHAR(21,24,47) 

2800 CALL HCHAR(21,25,50) 

2810 GOSUB 5590 
2820 SOSUB 6420 

2830 PRINT “EQUIVALENT LOAD IS" 

2840 PRINT “W*L ACTING AT CENTER." 

2850 PRINT "SOLVING, A=B=W*L/2“ 

2860 GOSUB 5590 

2870 EX=2 

2880 RANDOMIZE 

2890 WW=10*(INT(10*RND)+1) 

2900 LL=INT(iO*RND)+10 

2910 GOSUB 5630 

2920 GOSUB 5780 

2930 GOSUB 5810 

2940 GOSUB 6420 

2950 GOSUB 5950 

2960 GOSUB 6500 

2970 GOSUB 6250 

2980 AA=WU*LL/2 

2990 BB=AA 

3000 IF AAOA THEN 3050 
3010 IF BBOB THEN 3050 
3020 PRINT :"* * CORRECT * *- 
3030 GOSUB 5590 
3040 GOTO 3100 
3050 PRINT s"A=B=W*L/2" 

3060 PRINT “A=B=";AA;"POUNDS" 

3070 GOSUB 5590 

3080 EX=EX+1 

3090 GOTO 2890 

3100 I=1S 

3110 Y=16 

3120 Z=5 

3130 EX=EX+1 

3140 GOSUB 6450 

3150 PRINT "L = 16 FEET" 

3160 PRINT "W = 80 LBS/FT" 

3170 PRINT " ACTING 8 FT FROM A" 

3180 PRINT “ TO 12 FT FROM A":• 

3190 PRINT "EQUIVALENT FORCE IS" 

3200 PRINT “80 LBS/FT * <12 FT - 8 FT)" 

3210 PRINT “ = 320 LBS" 

3220 PRINT "APPLIED lO' FROM A." 

3230 PRINT s"SUM MOMENTS ABOUT A." 

3240 GOSUB 5590 

3250 SOSUB 5370 

3260 J=19 

3270 GOSUB 5560 

3280 LL=16 

3290 PP=320 

3300 GOSUB 5850 

3310 GOSUB 5950 

3320 CALL HCHAR(1-1,10,49) 

3330 CALL HCHAR<1-1,11,48) 

3340 CALL HCHAR(I-1,12,39) 


Continued on p. 82 


Inventory, Order Entry, 
Sales, & Mailing List 
For Your TI-99/4 

Interactive Programming 
Allows Maximum Flexibility for Customizing 
the Software to Your Specific Needs. 

Each program available separately; 

• Inventory $44.95 cassette; $49.95 disk 


• Order Entry " ** 

• Sales " « 

• Mailing List " " 

Interactive packages — disk-based only: 

• Inventory - Sales $89.95 

• Inventory - Order Entry 89.95 

• Order Entry - Mailing List 89,95 


Versions in Ti BASIC & Extended BASIC 

AH 4 programs $189.95 

(FREE library storage case included ) 

Add $2.50 for postage/handling. 
California orders, add 6% tax. 

To order, or for more information: 

Paul Yates Computer Services 
4037 Johnson Drive 
Oceanside, CA 92054 

Tel. (714)-758-1633 


QUALITY 
SOFTWARE 
FOR TI 99/4 



SPACE BATTLE You are the Earthfleets last hope, 

outnumbered you must rely on cunning and steely nerves to 
outwit the enerayt ^ 


SKI An exciting downhill race game. Hundreds of dif¬ 
ferent courses and different skiing conditions test your 

*9-95 


skill. 


LASER SHIELD 

mis9ilea with your 
mind are required* 


Shield the cities from incoming 
Fast reflexes and presence of 

18*95 


LAND ON MARS Landing is only half the fun* 

You must take off and dock with the orbiter* Hundreds 
of different landscapes to challenge you* Dragon option 
included! $8*95 


BARNYARD FUN A memory building game for child¬ 
ren ases four and up. $6-95 


Basie language on cassettes, complete instructions included* 


Plus ®l*5o shipping/bandling, Mh* residents add $% sales tax 
To order or for more information: 


American Software Design & Distribution Co, 
P*0. Box li6 

Cottage Grove, to. 55016 
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Local Networking . .. from p. 74 


N.T.S.U. DATANET 1 PARTS LIST 


Master Control Box 

IC1 - 74161 Counter 

IC2 - TIL311 HEX LED Display 

IC3 - 7437 NAND Buffer 

IC4, ICS - 555 Timer 

ICS, IC14 - LM386 AUDIO OP AMP 

IC7, ICS - 7805 + 5V Regulator 

R1 - IK 

R2 - 100K 

R3- 2.2K 

R4 f R6 - 10 Ohms 

R5 - 2 MEG 

R 1 5 - 1 OK PC MOUNT POT 
All Resistors are % Watt 

Cl, C2, C3 r Cl 0, Cl 1, Cl 2 ■ 

.1 UF Ceramic Disk 
C4, C21 - 4.7 UF Tantalum 
C5, C23 - .05 UF Ceramic Disk 
C6, C22 - 330 UF Electrolytic 
C7, CS - ,1 UF Tantalum 

SW1 - Normally Closed SPST 

Pushbutton Switch 
SW3 - SPST Toggle Switch 
RECT - 2 AMP Bridge Rectifier 
T1 -6,3V 3 AMP Transformer 

-MlSC.- 

Circuit Board 
Enclosure 

2 - D-9 Nine Pin Female Connectors 


2- Mini Phone Jacks 

Power Cord 

Wire 

— Very Rough Estimate of Parts Cost- 


Integrated Circuits 

Resistors 

Capacitors 

Switches, Transformer etc. 
Mi sc; 


$14.75 

.80 

4.90 

8.50 

12.50 


Master Total Estimated Cost $41.45 

Slave Control Box 

ICS-7404 HEX Inverter 

IC10 - 7420 Dual 4 Input NAND 

1011 - 7403 Quad NAND (Open Collector) 

I Cl 2, I Cl 3 - LM386 OP AMP 


Q1 - 2N2222 Transistor 

R7, R14 10K 

R8 # R9 - 330 Ohm 

R10 - 4.7K 

R11, R12 - 10 Ohms 

R1 3 - 20K PC MOUNT POT 

All Resistors are Y* Watt 

C13 - 6.8 UF Tantalum 
Cl4, Cl 9, C20 - .1 UF Ceramic Disk 

Cl 5, Cl6 - 330 UF Electrolytic 
Cl7, CIS - .05 UF Ceramic Disk. 


SW2 - SPST Toggle Switch 
LED 1, LED2 -Single LEDS 

-MlSC.- 

Enclosure 

2 - D-9 Nine Pin Female Connectors 
2 - Mini Phone Jacks 
Circuit Board 
Wire 

MlSC, Hardware 

— Very Rough Estimate of Parts Cost— 


Integrated Circuits 

Resistors 

Capacitors 

Switch, LEDS, Transistor 
MlSC. 


$3.50 

1.10 

2.45 

1.00 

12.00 


Slave Total Estimated Cost $20.05 

— Network Bus Cable Parts — 

17 - D-9 Nine Pin Male Connectors $34.00 

Cable 20.00 


Price Estimate for A 16 Slave System 


16 Slaves @20,05 
1 Master @41.45 
Cable Connectors 
Cable 

Total Estimated Cost 


$320.80 

41.45 

34.00 

20.00 

$416.25 






Civil Engineering . .. from p. 81 

3350 PRINT "320# t 10* - B*16’ = 0" 

3360 PRINT TAB(5)s"B=3200/16 LBS = 200 LBS 
3370 PRINT "NOW SUM FORCES" 

3380 GOSUB 5590 

3390 PRINT :"320# - 200# - A - 0" 

3400 PRINT " A = 120 LBS" 

3410 GOSUB 5590 
3420 EX-EX+1 
3430 RANDOMIZE 
3440 GOSUB 6660 
3450 GOSUB 6610 
3460 GOSUB 6730 
3470 GOSUB 5590 
3480 GOSUB 5370 
3490 GOSUB 6370 
3500 GOSUB 6500 
3510 GOSUB 5950 
3520 GOSUB 6250 

3530 BB=L0AD*(D2/2>L1)/LL+.005 
3540 BB=lE-2* UNT <BB*1E2> ) 

3550 AA=L0AD-BB 
3560 IF AAO-A THEN 3610 
3570 IF BBOB THEN 3610 
3580 PRINT :“** CORRECT **” 

3590 GOSUB 5590 
3600 GOTO 3660 

3610 PRINT i "SORRY. IT IS " 

3620 PRINT "A = "; AA 
3630 PRINT “B = " ; BB: 

3640 GOSUB 5590 

3650 GOTO 3420 

3660 GOSUB 6290 

3670 IF KEY=49 THEN 3420 

3680 IF KEY=51 THEN 5000 

3690 CALL CLEAR 

3700 1=16 

3710 Y=16 

3720 Z=5 

3730 GOSUB 6450 

3740 INPUT "LENGTH OF BEAM IN FT = ”sLL 
3750 GOSUB 5310 

3760 INPUT "LOADING W LB/FT = “sWW 


3770 IF WWOO THEN 3800 
3780 PRINT “IF W=0, A=B=0" 

3790 GOTO 3760 

3800 INPUT "ACTING AT DISTANCE FROM A ":L1 

3810 IF LI<0 THEN 3830 

3820 IF L1CLL THEN 3850 

3830 PRINT "SORRY, Q <= Ll < LL" 

3840 GOTO 3800 

3850 INPUT "TO - DISTANCE FROM A “!L2 

3860 IF L2< =L1 THEN 3880 

3870 IF L2<=LL THEN 3900 

3880 PRINT "SORRY, Ll < L2 <= L" 

3890 GOTO 3850 
3900 GOSUB 6730 
3910 GOTO 3480 
3920 CALL CLEAR 

3930 PRINT TAB 14);“COMBINATION LOADS":: 
3940 PRINT !"T0 SOLVE THIS TYPE PROBLEM:" 
3950 PRINT :"DRAW AND LABEL THE BEAM." 

3960 PRINT :"SUM MOMENTS ABOUT A OR B. “ 
3970 PRINT ::"SUM FORCES":: 

3980 GOSUB 5590 

3990 CALL CLEAR 

4000 RANDOMIZE 

4010 GOSUB 6660 

4020 GOSUB 6730 

4030 FP=100*(INT(154RND)) 

4040 D=INT<LL*RND) 

4050 GOSUB 5650 

4060 IF FP=0 THEN 4080 

4070 GOSUB 5710 

4080 IF WW=0 THEN 4130 

4090 GOSUB 5780 

4100 IF L1=LL THEN 4120 

4110 GOSUB 6630 

4120 GOSUB 5810 

4130 1=16 

4140 J=INT(D/LL*22)+5 

4150 GOSUB 5370 

4160 GOSUB 5950 

4170 IF WW=*0 THEN 4200 

4180 GOSUB 6370 

4190 GOSUB 6500 

4200 IF PP=0 THEN 4230 
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f 


Perfectly 

Balanced 

TI 

99/4 

educational software 

from 

MICRO-ED 





Excellent instructional programs 


otherwise specified, each one 
purchased for * 9.95 on Disk 


* 


* if interested in future availability of programs on Cassette, 
Phase iet us know as soon as possible. 


Send for free catalogue: 

MICRO-ED, Inc. • P.0. Box 24156 • Minneapolis, MN 55424 

or telephone us at (612) 926-2292 


Civil Engineering .. . 

4210 GOSUB 5560 
4220 GOSUB 5850 
4230 GOSUB 6250 

4240 BB=<PP*D+LOAD*(D2/2+L1))/LL+.OOS 
4250 BB=lE-2*(INT<BB*1E2)) 

4260 AA=PP+LQAD-B8 
4270 1F ABS(AA-A J >.01 THEN 4340 
4280 IF ABSfBB-B)>.01 THEN 4340 
4290 PRINT ! s " * * CORRECT * * " 

4300 GOSUB 5590 

4310 GOSUB 6290 

4320 IF KEY=49 THEN 3990 

4330 IF KEY=51 THEN 5000 ELSE 4390 

4340 PRINT ::“SORRY, THE ANSWER I GET IS" 

4350 PRINT :“A * ”; AA 

4360 PRINT "B = ";BB 

4370 GOSUB 5590 

4380 GOTO 3990 

4390 CALL CLEAR 

4400 PRINT "YOU MAY ENTER YOUR OWN" 

4410 PRINT s"PROBLEMS. JUST ENTER” 

4420 PRINT i"ALL VARIABLES AS “ 

4430 PRINT :"SHOWN ON THE DIAGRAM." 

4440 PRINT s:"I WILL GIVE THE ANSWERS."::;:; 

4450 GOSUB 5590 

4460 1=16 

4470 J=12 

4480 L1=0 

4490 L2=0 

4500 D2=0 

4510 L0AD=0 

4520 GOSUB 5370 

4530 GOSUB 5560 

4540 CALL HCHAR(1-3,J,80J 

4550 Y=16 

4560 Z=5 

4570 GOSUB 6370 

4580 CALL HCHAR(I-3,Y+2,87) 

4590 CALL HCHAR(1+2,13,76) 

4600 CALL HCHAR(1+1,Y.76) 

4610 CALL HCHAR(1+1,Y+l,49) 

4620 CALL HCHAR<1+1,Y+Z-l,76> 


I 


4630 CALL HCHARCI+1,Y+Z,50) 

4640 CALL HCHAR(I-1,8,68) 

4650 INPUT "LENGTH OF BEAM L = ":LL 

4660 GOSUB 5310 

4670 INPUT "FORCE P = ”:PP 

4680 IF PF=0 THEN 4740 

4690 INPUT "DISTANCE D = ”: D 

4700 IF D>LL THEN 4720 

4710 IF D>=0 THEN 4740 

4720 PRINT ; SORRY, O <= D <= L”: 

4730 GOTO 4690 

4740 INPUT "LOADING W = ":WW 
4750 IF WW=0 THEN 4880 

4760 INPUT "DISTANCE FROM A,LI = ":L1 

4770 IF LI<0 THEN 4790 

4780 IF L1<LL THEN 4810 

4790 PRINT "SORRY. O <= LI <L" 

4BOO GOTO 4760 

4B10 INPUT “DISTANCE FROM A,L2 = "; 1 ? 

4B20 IF L2<=L1 THEN 4840 

4830 IF L2< =LL THEN 4860 

4840 PRINT "SORRY, LI < L2 <= LL" 

4850 GOTO 4810 
4860 D2=L2-L1 


4870 
4880 
4890 
4900 
4910 
4920 
4930 
4940 
4950 
4960 
4970 
4980 
4990 
5000 
5010 
5020 
5030 
5040 
5050 
5060 


L0AD=WW1D2 


BB=fPP*D+LOAD*(D2/2+L1)>/LL+.005 

BB=lE-2*(INT(BB41E2)) 

AA=PP+LOAD-BB 

PRINT ::"A = AA:"POUNDS" 

PRINT ”B = BBj"POUNDS" 

GOSUB 5590 

PRINT :"ANOTHER PROBLEM?(Y/N) " 
CALL KEY<0,KEY,ST) 

IF KEY=89 THEN 4480 
IF KEY=78 THEN 5000 
GOTO 4950 
END 

CALL CLEAR 
CALL SCREEN(5) 

FOR £=1 TO 8 


CALL COLOR(E,12,12) 

NEXT E 

PRINT 

PRINT "SELECT":; 


Continued on p. 84 
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Typing Symbols... from p. 77 

3150 CALL HCHAR(21,10,35) 

3160 CALL HCHAR(21,12,52) 

3170 PRINT :::"PRESS # FOR DRILL" 

3180 CALL KEY(0,KEY, S > 

3190 IF KEY035 THEN 31B0 
3200 CALL COLOR<3,2,1) 

3210 GOSUB 4370 

3220 CALL HCHAR(17,10,35) 

3230 DATA "OPEN #2:“"RS232.TW.BA=110.,"CLOSE #6","OPEN #3i"“CSl"",INPUT" f “PRIN 

T #2:X“ 

3240 DATA “CLOSE #4:DELETE","INPUT *2:X,Y","OPEN 41:""RS232/2.BA=960O""","PRINT 
#1","PRINT #liCHR*(B) n 
3250 RESTORE 3230 
3260 GOSUB 3840 

3270 PRINT "THESE SYMBOLS ARE USED"!"LESS OFTEN:"!!RIGHT POINTER FINGER" 

3280 PRINT "7 LEFT POINTER FINGER"!”’ RIGHT POINTER FINGER":”’/. LEFT POINTER F 
INGER” 

3290 PRINT "S), TRY LEFT MIDDLE FINGER.. TRY LEFT MIDDLE FINGER" 

3300 PRINT i!"<NO DRILL FOR THESE SYMBOLS)"s:s"PRESS ANY SYMBOL.TO CONTINUE.” 

3310 CALL KEY CO,KEY,S) 

3320 IF 5<1 THEN 3310 
3330 IF KEY<48 THEN 3370 
3340 IF KEY<57 THEN 3310 
3350 IF KEYC65 THEN 3370 
3360 IF KEY<94 THEN 3310 
3370 CALL CLEAR 
3380 CALL SCREEN(2) 

3390 PRINT "YOU SHOULD KNOW ALL THE”s"SYMBOLS NOW.":s:"PRESS”:j"1 TO START OVER 


3400 PRINT :"2 FOR FINAL REVIEW":i"3 TO END PROGRAM":: 

3410 CALL SCREEN(4) 

3420 CALL KEY (O, KEY, S) 

3430 IF KEY=49 THEN 870 
3440 IF KEY=51 THEN 3830 
3450 IF KEYO50 THEN 3420 
3460 CALL CLEAR 

3470 PRINT " SCORE: RIGHT":TAB(16);"WRONG”::::::::::::::::::: 

3480 RESTORE 3490 

3490 DATA "LEN(NAMES&CITYS)“,"PRINT #2: AREA" , "PRINT :L;“"IS LENGTH. 

3300 DATA "PRINT :A;X","CALL JOYST(2,X,Y)","CALL SOUND<800,-4,2)" 
3510 DATA "ON K-48 GOTO 30,150,230"IF A<=B THEN 350”,”CALL KEY(0,K,S) 

3520 DATA "CALL CHAR<96,A*)","PRINT STRS<VAL(PS)>","PRINT "”HI 

3530 DATA "CALL VCHAR(10,12,42,8>”,"CALL COLOR(I,F,B)",“PRINT COS(Y>" 
3540 FOR 1*0 TO 14 

3550 READ PS < I) 3690 IF R=10 THEN 3740 

3560 NEXT I 3700 IF W*10 THEN 3760 

3570 R=0 3710 CALL HCHAR(4,25,R+4B) 

3580 W=0 3720 CALL HCHAR(5,25,W+48> 

3590 FOR 1*1 TO 10 3730 GOTO 3790 

3600 J=INT(15tRND) 3740 CALL HCHAR(4,24,49) 

3610 IF PS < J)=“"THEN 3600 3750 GOTO 3770 

3620 GOSUB 4180 3760 CALL HCHAR(5,24,49) 

3630 IF BS=PS(J)THEN 3670 3770 CALL HCHAR(5,23,48) 

3640 GOSUB 4330 3780 CALL HCHAR(4,25,4B> 

3650 W=W+1 3790 NEXT I 

3660 GOTO 3690 3800 CALL HCHAR(18,1,32,64) 

3670 GOSUB 4110 3810 GOSUB 3980 

3680 R=R+1 3820 GOTO 3370 


3700 IF W*10 THEN 3760 
3710 CALL HCHAR(4,25,R+4B) 
3720 CALL HCHAR(5,23,W+48> 
3730 GOTO 3790 
3740 CALL HCHAR(4,24,49) 
3750 GOTO 3770 
3760 CALL HCHAR(5,24,49) 
3770 CALL HCHAR(5,23,48) 
3780 CALL HCHAR(4,25,4B) 
3790 NEXT I 

3800 CALL HCHAR(18,1,32,64) 
3810 GOSUB 3980 
3820 GOTO 3370 


3830 STOP 

3840 PRINT :::"COPY THE GIVEN 
PHRASETHEN PRESS 

<ENTER>... 

3850 FOR 1=1 TO 9 
3860 READ PS(I) 

3870 NEXT I 

3880 FOR 1*1 TO 5 

3890 J=INT(9IRND)+1 

3900 IF PS(J)=“"THEN 3890 

3910 GOSUB 4180 

3920 IF BS-PS(J)THEN 3950 

3930 GOSUB 4320 


Civil Engineering .. . from p. 83 

5070- PRINT :“1 CONCENTRATED LOAD, CENTER" 

5080 PRINT :"2 CONCENTRATED LOAD ANYWHERE” 

5090 PRINT : 11 3 UNIFORM LOADS" 

5100 PRINT :"4 COMBINATION LOADS” 

5110 PRINT s"5 PROBLEMS ONLY" 

5120 PRINT :"6 YOUR OWN PROBLEMS" 

5130 PRINT :"7 END PROGRAM“::s 
5140 CALL VCHAR(1,2,32,24) 

5150 CALL VCHAR<1,31,32,24) 

5160 CALL VCHARU,1,32.24) 

5170 CALL VCHAR(1,32,32,24) 

5180 FOR E=1 TO S 
5190 CALL COLOR(E,2,12) 

5200 NEXT E 

5210 CALL KEY<0,KEY,ST) 

5220 CHOICE=KEY-40 
5230 IF CHOI CEO THEN 5210 
5240 IF CHOICE>7 THEN 5210 
5250 CALL CLEAR 
5260 CALL SCREEN(8) 

5270 FOR E*I TO 8 
5280 CALL C0L0R(E,2,1) 

5290 NEXT E 

5300 ON CHOICE GOTO 700,700,2540,3920,3990,4390,4990 

5310 IF LL>=1 THEN 5360 

5320 PRINT "HEY, WHAT KIND OF BEAM" 

5330 PRINT "HAS A LENGTH LIKE THAT?!!” 


5340 INPUT "TRY AGAIN; L * ":LL 

3350 GOTO 5310 

5360 RETURN 

5370 CALL CLEAR 

5380 CALL HCHAR(I,5,120) 

5390 CALL HCHAR(I,6,121,21> 

5400 CALL HCHAR(1,27,122) 

5410 CALL HCHAR(I+1,5,99) 

5420 CALL HCHAR<1+1,27,100) 

5430 FOR K=4 TO 26 STEP 22 
5440 CALL HCHAR(1+2,K,101) 

5450 CALL HCHAR(I+2,K+1,102) 

5460 CALL HCHAR(I+2,K+2,103) 

5470 CALL VCHAR(1+3,K+1,104) 

5480 CALL VCHAR<I+4,K+l,105,2) 

5490 NEXT K 

5500 CALL HCHAR(I+1,4,65) 

5510 CALL HCHAR(I+1,28,66) 

5320 RETURN 

5530 FOR DELAY*1 TO lOOO 
5540 NEXT DELAY 
5550 RETURN 

5560 CALL VCHAR(1-4,J,105,3) 

5570 CALL VCHAR(I-1,J,106 > 

5580 RETURN 

5590 PRINT :”PRESS ENTER TO CONTINUE" 
5600 CALL KEY(O,KEY,ST) 

5610 IF KEY013 THEN 3600 


Continued on p 
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Typing Symbols ... 

3940 GOTO 3960 
3950 GOSUB 4110 
3960 NEXT 1 

3970 CALL HCHAR(19,1,32,64) 
3980 CALL SOUND <34T,740,2) 

3990 CALL SOUND(4*T,5B7,2) 

4000 CALL SOUND(T/2,415,3) 

4010 CALL SOUND(T/2,440,3) 

4020 CALL SOUND(T/2,494,3) 

4030 CALL SOUND(T/2,440,3) 

4040 CALL SOUND(5*T,740, 2) 

4050 CALL SOUND(T,659,2) 

4060 CALL SOUND(4*T,659, 2) 

4070 CALL SOUND<64T,5S7,2) 

4030 CALL SOUND(1,9999, 30) 

4090 CALL CLEAR 
4100 RETURN 
4110 P*<J)="" 

4120 CALL SOUND<100, 392,2) 

4130 CALL SOUND(100,494,2) 

4140 CALL SOUND(100,537,2) 

4150 CALL SOUND(100,494,2) 

4160 CALL SOUND(100,392,2) 

4170 RETURN 
4180 

4190 CALL HCHAR<17,1,152,128) 
4200 FOR K=1 TO LEN(P«(J)) 

4210 CALL HCHAR(18,K+2, 

ASC(SEG*(P*(J),K,1))) 

4220 NEXT K 

4230 CALL SOUND <150,1397,4) 

4240 FOR L=1 TO 28 
4250 CALL KEY(O,KEY,S) 

4260 IF S<1 THEN 4250 
4270 IF KEY=13 THEN 4310 
4280 CALL HCHAR(19,L+2,KEY) 

4290 B*=B*&CHR4 (KEY) 

4300 NEXT L 
4310 RETURN 
4320 1=1-1 

4330 CALL SOUND(300,-8,O,110,4) 

4340 FOR DELAY=1 TO 1000 

4350 NEXT DELAY 

4360 RETURN 

4370 CALL CLEAR 

4380 PRINT Rl*s 

: " "S(R1< it" "&CHRS 

U52)*R4Sc H “ifCHR* 

(153)!!" "SrRl* 

4390 CALL HCHAR(23,5,131) 

4400 CALL HCHAR(23,6,132) 

4410 CALL HCHAR(23,7,133) 

4420 CALL HCHAR(23,25,128) 

4430 CALL HCHAR(23,26,129) 

4440 CALL HCHAR(23,27.130) 

4450 RETURN 

4460 CALL HCHAR(20,16,152,5) 
4470 CALL HCHAR(21,16,132,5) 
4480 CALL HCHAR(15,16,97) 

4490 CALL VCHAR<16,16,96,4) 

4500 CALL VCHAR(15,17,105) 

4510 CALL VCHAR<15,18,106) 

4520 CALL VCHAR(16,17,104,4) 
4530 CALL VCHAR<16,IS,107,4) 
4540 CALL VCHAR(15,19,124) 

4550 CALL VCHAR<16,19,152, 4> 
4560 CALL VCHAR(17,20,121) 

4570 CALL VCHAR<17,21,122) 

4530 CALL VCHAR<18,20,120, 2) 
4590 CALL VCHAR<13,21,123,4) 
4600 RETURN 
4610 FDR 1=1 TO 15 
4620 CALL COLOR(10,7,1) 

4630 CALL COLOR<10,12,1) 

4640 NEXT I 

4650 CALL COLOR(10,7,1) 

4660 RETURN 
4670 END 


TI-COUNT 

Small Business System 

• Gentral Ladgw (professionally approved) 650 

• Accounts Payable (writes checks) 300 

• Accounts Receivable (prepares bills) 300 

e Inventory (1400 items per disk) 300 

0 Mailing list (renewal letters) 650 


Mini Computer Performance 
At M icro Prices 


Only For The 99/4 


For Information on dealer 
program, write or call. 

To order, sand check to: 

PIKE CREEK 
COMPUTER CO., INC. 

2 Galaxy Drive 
Newark, Delaware 19711 
(302)239-5113 


TI-99/4 Software 

• Astronomy Programs 

• Matrix Routines 

• Linear Equation Solver 

• Fourier Transform 

• Music Analysis/Synthesis 

• Curve Fitting Routines 

• Hyperbolic Functions 

• Two-Dimensional FFT 

• Data Fitter 

Programming in TI BASIC 
Extended BASIC and UCSD Pascal 

Programs also Available for the 
TRS80 in Level 2 BASIC 

For further information write; 

Eastbench Computer Products 
1290 Cliff side Drive 
Logan, Utah 84321 
Tel: (801) 753-1084 


PROGRAMMING HINT (1) 


By Regena 


HCHAR Pause Eliminator 


j- 


:s ■■ 




Sometimes there is a noticeable pause when you are printing a character; 
word, or phrase from a data statement in a FOR-NEXT loop. For example * 

DATA 71,82,69,69,84,73,78,71,83 - 

FOR Y=10 TO 18 

READ L ' 

CALL HCHAR(9,Y,L) 7 

• NEXT Y V 7 ' 

. The pause is before the last letter is printed. 7 */ ;; 

/This problem can be circumvented by adding a non-visible charactef 
such as ASCII 32 to the DATA statement and printing it aLthe end of 
your series. v . 

.■ ■ . ■ ' . .J : ■; 

DATA 71,82,69,69,84,73,78,71,83,32 ; >7 ^V 

FOR Y®10 TO 19 ‘ ' 7?. ; 

' ‘ ' ■ ■ ■ • • read L • ‘ - V / * -7* 7; C -7', 

r CALL HCHAR(9,Y,L) * 7 ' Z * / 

NEXT Y '• 7 _/ - , 


* f 


CUMBERLAND 

TECHNOLOGY 

10 Wagner Drive 
Carlisle, PA 17013 

9900 Floating Point Math 
Routine Package 

(for use with Assembly Language) 

• Fast • Compact 
• Position-Independent 
' Re-Entrant (9 digits precision) 


Single 

CPU License 


$50.00 


99/4 Engineering & Scientific 
Programs Available 


SOFTWARE 

SERVICES 

TI-99/4 

CUSTOM PROGRAMMING 

• Specializing in Tutorials 
for the Elementary Grades 

• Personalized Consulting 
for the Compleat Novice 

• Down-to-Earth Prices 

For more information write: 

Pablo Diablo* 

P. O. Box 4863 
Santa Clara, CA 95054 

- SOURCE ID TCV774 
*The Legendary Evil Kiteflyer 
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Civil Engineering... from p. 84 

5620 RETURN 

5630 CALL CLEAR 

5640 PRINT "PROBLEM"::: 

3650 PRINT "GIVEN A SIMPLE BEAM" 

5660 PRINT "SUPPORTED AT THE ENDS.“ 

5670 PRINT “IT IS";LL?“FEET LONG." 

56SO RETURN 

5690 IF CHOICE>2 THEN 5710 

5700 PRINT IGNORE WEIGHT OF THE BEAM." 

5710 PRINT "A CONCENTRATED LOAD OF” 

5720 PRINT PP;"POUNDS IS" 

5730 IF CHOICE=1 THEN 5760 
5740 PRINT Dj"FEET FROM END A.“ 

5750 RETURN 

5760 PRINT "AT THE CENTER OF THE BEAM." 
5770 RETURN 

5780 PRINT s "THERE IS A UNIFORM LDAD” 

5790 PRINT M OF“;WW;"POUNDS/FOOT" 

5800 RETURN 

5810 PRINT s"FIND THE REACTION FORCES."t: 

5820 PRINT "DRAW AND LABEL THE PROBLEM. “j: 

5830 GOSUB 5590 

5840 RETURN 

5850 LB*=STR*(PP> 

5860 FOR 11=1 TO LEN(LB*) 

5870 JJ=II+J-4 

5880 CALL HCHAR(1-5,JJ,ASC(SEG*(LB*,I1,1 ))) 
5890 NEXT II 

5900 CALL HCHAR<1-5,JJ+1,32) 

5910 CALL HCHAR(1-5,JJ+2,76) 

5920 CALL HCHAR<1-5,JJ+3,66) 

5930 CALL HCHAR(1-5,JJ+4,83) 

5940 RETURN 
5950 FT*=STR* <LL> 

5960 FOR 11=1 TO LEN(FT*) 

5970 J0=12+II 

5980 CALL HCHAR(1+1,JJ,ASC(SEG*(FT*,II,1>)) 
5990 NEXT II 

6000 CALL HCHAR(I+1,JJ+2,70) 

6010 CALL HCHAR(1+1,JJ+3,69,2) 

6020 CALL HCHAR(1+1.JJ+5.84) 

6030 RETURN 

6040 CALL HCHAR(23,3,9S) 

6050 CALL HCHAR(23,4,77) 

6060 CALL HCHAR(23,6,61) 

6070 CALL HCHAR(23,S,48) 

6080 PRINT "WRITE THE EQUATION" 

6090 GOSUB 5590 
6100 RETURN 

6110 PRINT :"TAKING MOMENTS AT A." 

6120 PRINT :"P*D - B*L = O" 

6130 PRINT " B = P * D/L” 

6140 PRINT " B =";PP;"*"}D;"/";LL 

6150 PRINT " B = 'j8B;"POUNDS" 

6160 PRINT :"NOW FIND A." 

6170 GOSUB 5590 
61BO RETURN 


6190 PRINT :"SUM OF FORCES = 

6200 PRINT "P-A-B = O" 

6210 PRINT ” A = P-B =";PP;;BB 

6220 PRINT " A = AA;"POUNDS" 

6230 GOSUB 5590 
6240 RETURN 

6250 PRINT s"WHAT ARE A AND B IN POUNDS?" 
6260 INPUT "A = ”iA 
6270 INPUT “B a ■■ -g 
6280 RETURN 

6290 PRINT s j *'DO YOU WANT MORE PROBLEMS?™ 
6300 PRINT :"1 YES, SAME KIND" 

6310 PRINT "2 YES, MY OWN PROBLEMS" 

6320 PRINT "3 NO, DO SOMETHING ELSE” 

6330 CALL KEY(0,KEY,ST) 

6340 IF KEY<49 THEN 6330 
6350 IF KEY>51 THEN 6330 
6360 RETURN 

6370 CALL HCHAR(1-1,V,112, 2 > 

6380 CALL HCHAR(1-2,Y,112,Z) 

6390 CALL VCHAR(1-2,Y-l,114,2) 

6400 CALL VCHAR(1-2,Y+Z,113,2) 

6410 RETURN 

6420 1=16 

6430 Y=6 

6440 2=21 

6450 GOSUB 5370 

6460 GOSUB 6370 

6470 CALL HCHAR(1-3,16,87) 

6480 CALL HCHAR(1+1,16,76> 

6490 RETURN 

6500 X=INT(Y+Z/2-3) 

6510 UL*=STR*(WW) 

6520 FOR E=1 TO LEN(UL$) 

6530 CALL HCHAR(I-3,X+E-l,ASC(SEG*(UL*,E,1))) 
6540 NEXT E 

6550 CALL HCHAR(I-3,X+E,76) 

6560 CALL HCHAR(1-3,X+E+1,66> 

6570 CALL HCHAR(I-3,X+E+2,47) 

6580 CALL HCHAR(1-3,X+E+3,70) 

6590 CALL HCHAR<1-3,X+E+4,84) 

6600 RETURN 
6610 GOSUB 5630 
6620 GOSUB 57BO 

6630 PRINT "ACTING FROM";L1;"FEET FROM A" 
6640 PRINT "T0";L2;"FEET FROM A" 

6650 RETURN 

6660 LL=INT(B*RND)+12 

6670 WW=10*(INT(4tRND>+5> 

6680 LIMl=INT(3*LL/4> 

6690 L1=INT(LIM1*RND> 

6700 LIM2=LL-L1 

6710 L2=INT(LIM2*RND)+L1+1 

6720 RETURN 

6730 D2=L2-L1 

6740 LDAD=WW*D2 

6750 Y=INT(L1/LL*22)+6 

6760 Z=INT(D2/LL*22)-1 

6770 RETURN 


ATTENTION 

DEALERS, 
DISTRIBUTORS, 
& BOOKSTORES 

CALL OR WRITE US ABOUT 
SELLING SINGLE COPIES OF 



Advertise In 



Call or Write for 

Rate Card Today! 

99’er Magazine / Ad. Dept. 

2715 Terrace View Drive 
Eugene, Oregon 97405 
(503)-485-8796 
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Battle At Sea . .. from p. 37 

4830 IF DS(24)—LE THEN 4920 

4840 IF DS(Z4>=0 THEN 4870 

4850 W=W+1 

4060 GOTO 4920 

4870 5CQRE=iSC0«E+l 

4880 IF T=0 THEN 4910 

4890 GOSUB 4990 

4900 GOTO 4920 

4910 GOSUB 4980 

4920 NEXT Z4 

4930 IF T=Q THEN 4960 

4940 W1=W 

4950 GOTO 2880 

4960 W-Ull 

4970 GOTO 2880 

4980 SCP=SCORE 

4990 CALL HCHAR(23,1,32,32) 

5000 FOR X3=l TO LEN(PR*)+10 

5010 CALL HCHAR(23,X3+6,ASC(5EG*<PR«c" DESTROYED" 
X3,l))> 

5020 NEXT X3 

5030 IF T=0 THEN 5070 

5040 CALL VCHAR(20,20,SCQRE+48) 

5050 IF SCORE-5 THEN 5120 
5060 RETURN 

5070 CALL HCHAR<20,27,5CORE+48) 

5080 IF SC0RE=5 THEN 5120 
5090 RETURN 

5100 PRINT "THE COMPUTER WINS AGAIN" 

5110 GOTO 5130 

5120 PRINT "YOU JUST GOT LUCKY THIS TIME" 

5130 PRINT "IF YOU WISH TO PLAY AGAIN" 


5140 PRINT "ENTER ■■■y"",IF NOT ENTER ""N. 

5150 INPUT NG* 

5160 IF NGt="N"THEN 5330 
5170 IF NG*="Y''THEN 5200 
5180 CALL SOUND(200,110,0) 

5190 GDTO 5130 

5200 FOR L=1 TO 10 

5210 FOR LI=1 TO 10 

5220 P <L,Li)=0 

5230 0(L,Ll)=O 

5240 NEXT LI 

5250 NEXT L 

5260 FOR 1*1 TO 5 

5270 FOR Ll=l TO 5 

5280 SH < L, L1,1)=0 

5290 SH(L,L1,2)=0 

5300 NEXT LI 

5310 NEXT L 

5320 GOTO 880 

5330 CALL CLEAR 

5340 STOP 

5350 NNN=0 

5360 AAA=0 

5370 FOR X=1 TO LE-1 

5380 IF NNN=1 THEN 5410 

5390 IF SH(S,X,1)=SH(S,X + l,1>THEN 5440 
5400 IF AAA=1 THEN 2010 

5410 IF SH(S,X,2)<>SH(S,X+l,2)THEN 2010 
5420 NNN=1 

5430 GOTO 5450 
5440 AAA=1 
5450 NEXT X 
5460 RETURN 
5470 END 


Harried Housewife ... from p. 39 

4450 CALL HCHAR(X,Y+l,78) 

4460 CALL HCHAR(X,Y+2,69) 

4470 RETURN 

4480 DATA 80,82,69,83,83,32,69, 
78,84,69,82,32,84,79,32,67 
79,78,84,73,78,85,69,32 
4490 RESTORE 4480 
4500 FOR Y=3 TO 26 
4510 READ GR 
4520 CALL HCHAR(23,Y,SR> 

4530 NEXT Y 

4540 CALL KEY(O,KEY,ST) 

4550 IF KEY013 THEN 4540 
4560 CALL HCHAR(4,24,32, 5) 

4570 CALL HCHAR(23,2,32,25) 

4580 ON (K1-64)GOSUB 4630,4670, 
4710,4750,4790,4830,4870, 
4910,4950,4990,5030,5070, 
5110,5150,5190,5230 
4590 CALL HCHAR(X,Y,K1) 

4600 ON (K2-64)GOSUB 4630,4670, 
4710,4750,4790,4830,4S70, 
4910,4950,4990,5030,5070, 
5110,5150,5190,5230 
4610 CALL HCHAR(X,Y,K2> 

4620 GOTO 1130 

4630 X=3 

4640 Y=4 

4650 GOSUB 5270 

4660 RETURN 

4670 X=3 

4680 Y=9 

4690 GOSUB 5310 

4700 RETURN 

4710 X=3 

4720 Y=14 

4730 GOSUB 5270 

4740 RETURN 

4750 X=3 

4760 Y=19 

4770 GOSUB 5310 

47BO RETURN 

4790 X=8 

4800 Y=4 

4810 GOSUB 5310 

4820 RETURN 

4830 X=8 

4840 Y=9 

4850 GOSUB 5270 

4860 RETURN 

4870 X=S 

4880 Y=14 

4890 GOSUB 5310 


4900 

RETURN 

4910 

X=B 

4920 

Y= 19 

4930 

GOSUB 5270 

4940 

RETURN 

4950 

X~13 

4960 

Y=4 

4970 

GOSUB 5270 

4980 

RETURN 

4990 

X= 13 

5000 

Y=9 

5010 

GOSUB 5310 

5020 

RETURN 

5030 

X —13 

5040 

Y=14 

5050 

GOSUB 5270 

5060 

RETURN 

5070 

X— 13 

5080 

Y= 19 

5090 

GOSUB 5310 

5100 

RETURN 

51 lO 

X= 18 

5120 

Y=4 

5130 

GOSUB 5310 

5140 

RETURN 

5150 

X= 18 

5160 

Y=9 

5170 

GOSUB 5270 

5180 

RETURN 

5190 

X = 18 

5200 

Y— 14 

5210 

GOSUB 5310 

5220 

RETURN 

5230 

X^IS 

5240 

Y=19 

5250 

GOSUB 5270 

5260 

RETURN 

5270 

FOR XX=X-1 TO X+2 

5290 

CALL HCHAR< X X, Y — 1,43,4) 

5290 

NEXT XX 

5300 

RETURN 

5310 

FOR XX=X-1 TO X+2 

5320 

CALL HCHAR{XX,Y-l P 44,4) 

oo oO 

NEXT XX 

5340 

RETURN 

5350 

CH(SS)—HH(1) 

5360 

X=3 

5370 

y-4 

5380 

RETURN 

5390 

CH iSS) -HH(2) 

5400 

X~3 

5410 

Y=9 

5420 

RETURN 

5430 

CH(SS)=HH(3) 

5440 

X=3 


5450 Y=14 

5460 RETURN 

5470 CH(SS)=HH(4) 

5480 X=3 

5490 Y=19 

5500 RETURN 

5510 CH(SS)=HH(5) 

5520 X=B 

5530 Y-4 

5540 RETURN 

5550 TH <SS)=HH <6> 

5560 X-S 

5570 Y=9 

5580 RETURN 

5590 CH(SS)=HH<7) 

5600 X=8 

5610 Y=14 

5620 RETURN 

5630 CH < SS)=HH(8) 

5640 X=8 

5650 Y-19 

5660 RETURN 

5670 CH(SS)=HH(9) 

5680 X-13 

5690 Y=4 

5700 RETURN 

5710 CH < SS)=HH(10) 

5720 X=13 

5730 Y=9 

5740 RETURN 

5750 CH(SS)=HH(11) 

5760 X=13 

5770 Y= 5 4 

5780 RETURN 

5790 CH(SS)=HH(12) 

5800 X=13 

5810 Y=19 

5820 RETURN 

5830 CH(SS)=HH(13) 

5840 X=18 

5850 Y=4 

5860 RETURN 

5870 CH(SS)=HH(14) 

5880 X=13 

5890 Y=9 

5900 RETURN 

5910 CH(SS)=HH(15) 

5920 X=18 

5930 Y=14 

5940 RETURN 

5950 CH(SS)=HH(16) 

5960 X=1B 

5970 Y=19 

5980 RETURN 
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Now, you can separate 
your Tl 99/4 Computer 
from your Tl Peripherals 



BETTER CONVENIENCE • EASE OF OPERATION • VERSATILITY 

Our (2’) Two Foot Cable is made to interconnect your 
Texas Instruments T! 99/4 Computer with almostany 
combination of Printer, RS 232, Tape, or Controller. 

ORDER FORM 


SEND ORDER WITH PAYMENT TO: 

RCL COMPUTERS 

411 Allegheny River Blvd. 
OaKmont, PA, 15139 

(41 2J 828-4301 



COMPUTERS 


SHIPTHE FOLLOWING; 

, _ Heavy Duty 2 r Cable At $44,95 ea. 

__ Heavy Duty 3 J Cable At 554,95 ea. 

□ Check No_Amount ___ 

Cl Money Order_Amount-- 

Price F.O.B. Pittsburgh, PA. 

PA. Deliveries add 6% Sales Tax 
A flow 3-4 weeks delivery 

SH IP TO; 

NAME ______ 

ADDRESS-„--- 

CITY__ STATE - - _ ZIP_ 






















I 



j 


TM 


3F HeiSSIglMi SUBSCRIPTION 


□ YES—Please sign me up as a subscriber. Enclosed is my payment or 
credit card billing information. 


Term 

U.S.A. 

Canada 

Foreign 

Foreign 



& Mexico 

Surface 

Air 

1 -yr (6 issues) 

□ $15 

1_l$18 

UJ$25 

□ $40 

2-yr {12 issues) 

□ $28 

□ $34 



3-yr {18 issues) 

□ $39 

□ $48 




Attention Dealers: Please write or call for bulk subscription rates. Also ask about our inexpensive 
magazine directory listings to publicize your retail locations. Call: (503)-485-8796 




QTY 


TITLE 


PRICE 


No. C.O.D. orders accepted* Add $1.50 
postage & handling for 1 book, $2.00 for 
2 books, or $2.50 for 3 or more books. 


POSTAGE 

TOTAL 


TOTAL 

AMOUNT 



(BrHUini 




*U.S. ONLY-FOR SHIPMENT 
OUTSIDE THE U.S. 

INQUIRE SEPARATELY 

TOTAL 


QTY 


ITEM 


PRICE 


TI-SETTE ADAPTOR 


$3.50 

SHIPPING - 75<t ea. * 


DIGITAL COMPUTER CASSETTES $9.95 
in LIBRARY ALBUM or 3 for $27.00 


SHIPPING - $2.00 for 1 st ALBUM, 75<f ea. add * 


MINI-FLEX DISKETTE FILE $24.95 

_ SHIPPING - $2.50 ea.* 


FRICTION-FEED KIT 
FOR EPSON MX-80 


$49.95 

SHIPPING - $2.00 ea.* 


TOTAL 


Back issues of 99'er Magazine available — $3.95 ea. (postpaid) 


issue(s) desired 


(month/month, year) 


Address shown is: □ Business □ Home 


NAME 


ADDRESS 
CITY_ 


PLEASE 

PRINT 


STATE. 


ZIP 


quantity 


TOTAL 


99'er MAGAZINE SUBSCRIPTION 


TOTAL 99'er BOOKSTORE 


TOTAL 99'er-ware 



□ Check enclosed MUST BE in u.s. funds drawn on a u.s, bank 


Bill my: 








_ 




_L_ 



j_ 


Expiration Date. 


□ visa I [Master Charge 


Account No. 


MC Only — List 4 digits above your name. L 


-,.„L 


Signature. 


AMOUNT 


PLACE 

STAMP 

HERE 



P.O. Box 5537 
Eugene, OR 97405 








Almost Everything 

You Ever Wanted to Know About Music 



Middle 



c # # 

d'i> 



Figure 1. Piano Keyboard 


. . . BUT WERE AFRAID TO ASK 


I s music terminology Greek to you? 
Do you feel deficient in certain areas 
of your musical ability? How are 
your listening skills? If you enjoy music 
and want to test and improve your abili¬ 
ties, Tl’s Music Skills Trainer can be a 
valuable tool. This program provides 
practice in aural recognition of pitches, 
intervals, and chords, and develops your 
ability to remember musical phrases. 
You can control the complexity of each 
drill by selecting various options includ¬ 
ing note range, use of sharps (J) and 
flats (f>), types of chords and intervals, 
and the playing of random music be¬ 
tween examples. 

Since the program is designed to pro¬ 
vide drill and does not teach the under¬ 
lying concepts involved, this article will 
first cover relevant aspects of music 
theory. We’ll then follow it up with a 
review of Music Skills Trainer. 

The Scale 

The fundamental concept involved is 
that of the scale—an ordered group of 
tones within an octave. The C Major 
Scale, with which almost everyone is 
familiar, provides the standard pattern 
for every major scale (Do-Re-Mi-Fa-Sol- 
La-Ti-Do), This pattern originated with 
the Greeks and is based upon the tetra- 
chord. A tetrachord can be thought of 
as half of a scale, it consistsof four tones 
arranged such that they contain two 
whole steps followed by a half step. 
Refer to the diagram of a piano key¬ 
board in Figure 1. Starting at middle c, 
each progression up the keyboard repre¬ 
sents a half step or semitone. For ex¬ 
ample, all the following represent half 


steps: c-cjj, c«-d,d-de,d8 -e, e-f, etc. 
The first tetrachord for the C Major 
Scale consists of the following two 
whole steps: c-d and d-c followed 
by the half step e-f. The second tetra¬ 
chord begins with g and again consists 
of two whole steps followed by a half 
step, ending with c' (an octave above 
middle c). This tetrachord pattern 
(1+1+ 14) was referred to as a “diatonic” 
tetrachord, and the major scale formed 
by two such tetrachords separated by a 
whole step is therefore called a “diatonic 
scale”. 

In order to accommodate Oriental 
and other music, Greek theorists modi¬ 
fied the two middle tones of the diatonic 
tetrachord in several ways. One of these, 
called the “chromatic tetrachord”, con¬ 
sisted of the pattern 114 + 14+14 (e.g., c, 
dfl, e, f). Various combinations of these 
two tetrachords necessitate the division 
of an octave into the familiar twelve 
equally spaced intervals referred to as 
the chromatic scale: c, cf, d, d$ , e, f, 

fg.s, g#,a,a)j,b,c'. 

“Pitch” refers to the location of one 
of these tones in a scale and is defined 
by a regular frequency of vibrations. In 
the United States the standard assign¬ 
ment for “a” is 440 vibrations per 
second. It happens that a pure octave 
differs from any reference pitch by a 
factor of exactly 2, so tha'r a’ = 880 and 

A = 220. 

Although knowledge of frequencies 
is not required for use of the Music 
Skills Trainer , you may be interested to 
know how frequencies are assigned to 
other scale positions. Because each 
octave is divided into twelve equally 


By Norma and John Clulow 

1 

spaced intervals, the factor 2^is used to 
define the relative frequencies of succes¬ 
sive tones. For example, 

if a = 440; 
a# = 440 x 2^ 

b = ajx 2^= ax 2^x 2^= ax (2^) 2 . 

Given any reference frequency, f 0 , then 

the relative pitch of any other scale 
position, f, can be calculated by count¬ 
ing the number of half steps to that 
position, n , and using the formula: 

f = 

The following program calculates and 
plays a chromatic scale beginning with 
middle c (262). 


1 OO REM tIl**£X***y 

110 REM X MUSIC 1 * 

120 REM *********** 

130 REM 99'ER VERSION 7.B1.1 
REM BY NORMA AND JOHN Cl I 
150 REM 
160 REM 
170 FO-262 
ISO FOR N=0 TO 12 
190 F =F0*■2* (1/12)) A N 
200 CALL SOUND(-600.F,0) 

210 NEXT N 
220 STOP 


11 . nw 


Scales In Various Keys 

Now let us return to the diatonic 
(major) scale. A major scale can have a 
starting or “root” note of any of the 
twelve chromatic pitches. As in the case 
discussed above, a major scale is con¬ 
structed, starting with the root, with 
two diatonic tetrachords (1+1+14) sepa¬ 
rated by a whole step. A more conven- 
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WORLD WIDE 
Airmail Service 

ON TAPE CASSETTE 
PROGRAMS FOR YOUR 

TI-99/4 


I ACCOUNTING PACKAGE 

I Runs on cassette; no disks or printers 
I needed. Enter journal in any order; out- 
I put is journal in date order, general ledger 
I in date within account no. order, balance 
I sheet and profit & loss statement. Copy 
I from screen to books. RAM sort limits 
I max. 100 journal entries per run. Takes 
I about VA hours. Saves account balances 
I for next run. $50.00 

I EARLY READING PACKAGE 

I Your words or ours are displayed in giant 
I lower case letters. Child must type word 
I on keyboard—each letter is checked 
I when typed. Child has another chance if 
I wrong; child's letter displayed under the 
I original if right. Musical tune is rewarded 
I when word correctly completed. Speech 
I Synthesizer optional. $15.00 

I WORD LIST PACKAGE 

I Can be used alone, or with Early Read- 
I ing. Type in your child's short story. 
I Computer sorts words, deletes duplicates 
I and saves on tape a list of words to be 
I learned for reading that story. $10.00 

I CONCENTRATION 

I A version of pelmanism using your choice 
I of 10 three tetter words—each scattered 
I randomly two times on a 4x5 grid, Words 
I are displayed in place then replaced by 
I numbers. Object is to remember which 
I numbers covers which word and find 
I matches. Computer keeps score and also 
I decides first player. Speech Synthesizer 
I optional. $10.00 

I AMERICAN BACCARAT 

I Computer randomly deals cards and 
I decides win, lose, or draw. Perfect your 
I system without casino losses, or play 
I with a stake you'll wish you had.$10.00 

I FINANCIAL PACKAGE 

I Loan payment calculator, repayment 
I schedule, pension calculator—finds how 
I much to save each year to maintain 
I current standard after retirement. Takes 
I interest and inflation rates into account. 

I $7.50 

I PERCENTAGE COMPARISONS 

I Enter and save current and historical 
I values of stocks, currency, commodities, 
I etc. Calculates, sorts, and lists by per- 
I oentage changed. $7.50 

I No disks, RS-232s, printers, etc. 

I needed to run any o f these pro gram. 

I Send International Money order in 
I U.S. $ or equivalent in local currency. 

I Ontario Residents add 7% P. S. T. 

I ANTHJSTLE SYSTEMS 
I & PROGRAMMING LTD, 

I 563 Patricia Drive 

I Oakville, Ontario 

| Canada, L6K 1M4 
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ient way to construct a major scale is 
simply to remember that half steps 
occur between the 3rd & 4th and 7th 
& 8th tones. Referring to Figure 1, a 

major scale with eb as the root would be 
constructed using the following steps: 


9 a 




d f e 


Steps 

This scale is referred to as an E^ Major 
Scale or a scale in the key of eP since 
eP is the root. Similarly, a major scale 
in the key of G is constructed as follows: 


b c' d' 


a’ 


Steps 

While there are twelve such different 
diatonic scales, they all sound the same 
because they are based on the same pat¬ 
tern of diatonic steps. The following 
program plays these scales beginning 
with C Major. 


ICO 
1 10 
120 
130 
140 
150 
160 
170 
100 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 


REM *********** 

REM * MUSIC 2 * 

REM *********** 

REM 99'ER VERSION 7.81.1 
REM BY NORMA AND JOHN CL.tlLOW 
REM 
REM 

FO=262 

FOR 1=0 TO 11 
F=F0* (2'~ < 1/12) ) -"I 
FOR J=1 TD 8 
N=2 

IF J=4 THEN 240 
IF J=8 THEN 240 ELSE 250 
N=1 

F=F t(2 A (1/12))"N 
CALL SOUNDi-600, F, Q > 

NEXT J 
NEXT I 
STOP 


Intervals 

An interval is the difference in pitch 
between two notes. Interval names indi¬ 
cate the number of included tones of 
the major scale. Starting with middle c in 
Figure 1, the basic interval names are as 
follows: c-c, unison (prime);c-d,second; 
c-e, third; c-f, fourth; c-g, fifth; c-a, 
sixth; c-b, seventh; and c-c', octave, c-f 
is a fourth because it includes the follow¬ 
ing diatonic tones of theC Major Scale: 
c, d, e, and f. Similarly, in the EP Major 
Scale a fourth is eP -a? , and in the G 
Major Scale a fourth is g-c' However, as 
in the case of scales, an interval in one 
key sounds like that interval in another. 

Four of the eight intervals can exist 
in one of four forms. If the upper note 
of the interval lies within the major 
scale of the lower or root note, the in¬ 
terval may be classified as “major.” If 
the upper note is lowered a half step, 
however, the interval then becomes 
“minor.” For example, c-e is a major 
third and c-e^ a minor third. This rule 


applies to four intervals; the second, 
third, sixth, and seventh. The remaining 
intervals — fourth, fifth, and octave - 
are classified as “perfect” — they do not 
exist in major and minor forms. The 
following program plays all of the inter¬ 
vals above in the C Major scale, i.e., 
with middle c as the lower or root note. 


100 
1 10 
120 
130 
MO 
150 
160 
170 
1 BO 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 


REM ***** 
REM * MUS 
REM * * * * * 

REM 99'ER 
REM PY NO 
REM 
REM 

DIM NJ(ll) 
FOR 1=0 TO 
READ N* i I> 
CALL CLEAR 
PR I NT 


*********** 

* MUSIC 3 * 

*********** 

99'ER VERSION 7.81.1 
PY NORMA AND JOHN CLUI.UW 


Fan 
11 

F C I ) 


( n : t 


290 


FOR J=1 TO 2 

CALL SOUND(1OOO,26 2,0 > 

CALL SOUND(1OOO,F(I),O) 

CALL SOUND < 3000, 110.30 > 

NEXT J 
NEXT I 

DATA UNISON,262,MAJOR SECOND. 
264,MINOR SECOND,277,MAJOR 
THIRD,330,MI NOR THIRD,311, 
FOURTH,346,FIFTH, 092 
DATA MAJOR SIXTH,440, 

MINOR SIXTH,415,MAJOR SEVENTH, 
494,MINGR SEVENTH,466.OCTAVE, 


in d— _■ 


300 STOP 

The remaining two categories of in¬ 
tervals “augmented” and “diminished” 
are not used in the Tl Music Skills 
Trainer and so will not be discussed in 
detail. They are formed as follows: 
augmented~a major or perfect interval 
is made one half step larger; diminished 
--a minor or perfect interval is made one 
half step smaller. 

Finally, intervals may be classified 
according to which note is played first. 
If the lower note is played first, the in¬ 
terval is said to be ascending (c-e), and 
if the upper note is played first, it is 
descending (e-c). 

Chords 

A chord is several notes played simul¬ 
taneously, usually three or more, When 
a chord consists of three tones it is 
called a triad. Given any major scale, 
four triads can be formed from the start¬ 
ing note (root) of that scale: major, 
minor, augmented, and diminished. A 
major triad consists of the root, the 
third, and the fifth. For example, in a C 
major scale, starting with the root c, the 
third is c-e, and the fifth is c-g. The 
major chord is then c-e-g. Similarly, in 

the major scale, given the root e& , 
the third g, and the fifth , the major 
chord is eP-g-bP. 

A major chord is changed to a minor 

chord by lowering the second note (i.e., 

the third) one half step. For example, 

the C major chord c-e-g becomes the c 

minor chord c-eP-g and the e^major 

chord becomes the eoninor chord 
e t>-gf>-b P. 











A minor chord can further be changed 
to a diminished chord by lowering the 
third note (i.e., the fifth) one half step. 
For example, the c minor chord c-e^-g 
becomes the c diminished chord c-e^-gt* 
and the e^minor chord e^-g^-b^ becomes 
the e&diminished chord e^-g^-b^. (b^ 


is called b double flat and is the same 
note as a.) 

The augmented chord is formed by 
raising the third note of the major chord 
(i.e. the fifth) one half step. For example, 
the c major chord c-e-g becomes the c 
augmented chord c-e-gtf and the e ^ major 
chord becomes the eb augmented chord 
e^-g-b. 

As in the case of scales and intervals, 
chords with the same name sound alike. 
All major chords sound alike; all minor 
chords sound alike, etc. 

If the lowest note of the chord is the 
root, the chord is said to be in root posi¬ 
tion. All four types of triads (chords) 
can be played in inverted form, however. 
For example, the C major chord c-e-g 
may be altered from its root position 
form to one of the following inversions 
by making the lowest note either the 
third or the fifth: e-g-c'and g-c'-e'. Simi¬ 
larly, the inverted forms for the e^minor, 
which in root position is written or 
played e^-gi , -b t> , are g^-bP-e^' and b^ 
-eP'-g b*. 


Chords of more than three notes can 
be formed, and there are several differ¬ 
ent varieties. One of them, the seventh, 
is used in the Music Skills Trainer and so 
will be described here. The seventh 
chord contains the root, third, fifth, and 
the seventh lowered by a half step. For 
example, a seventh in the key of Cmajor 
is c-e-g and b lowered by a half step or 
bb . Similarly, in the key of e& the sev¬ 
enth chord is eb-g-bP-dP (d lowered by 
a half step). 

While the seventh chord contains 
four notes, the TI-99/4 can play only 
three notes simultaneously; therefore, 
following traditional rules of harmony 
the fifth of the chord (third note) may 
be omitted to give a seventh in the form 
c-e-bP. As in the case of triads, the sev¬ 
enth may appear in inverted forms. 

The following program will allow 
you to compare and contrast major, 
minor, augmented, diminished, and sev¬ 
enth chords in their root and invertec 
forms. 


100 REM *********** 

110 REM * MUSIC 4 * 

120 REM *********** 

130 REM 99"ER VERSION 7.81.1 
140 REM BY NORMA AND JOHN CLULOW 
150 REM 
160 REM 

170 REM DISPLAY MENU 
180 CALL CLEAR 

190 PRINT TAB (lO);"1 MAJOR";:TAB 
(1 O);"2 MINOR"::TAB(lO); 

"3 DIMINISHED": : TAB(10) ; 

’•4 AUGMENTED" : : 

200 PRINT TAB(10);"5 SEVENTH":::: 

:: iTAB(8);"YOUR CHOICE^" 

210 REM ACCEPT CHOICE 


220 CALL KEY<0.KEY,STATUS) 

230 IF KEY<49 THEN 210 
240 IF KEY>53 THEN 210 
250 CALL HCHAR(23.23,KEY) 

260 KEY=KEY—48 

270 REM ASSIGN FREQUENCIES 
280 FI=262 

290 ON KEY GOTO 300,330,360,390,420 

300 F2=330 

310 F3=392 

320 GOTO 440 

330 F2=311 

340 F3=392 

350 GOTO 440 

360 F2=311 

370 F3=370 

380 GOTO 440 

390 F2=330 

400 F3=415 

410 GOTO 440 

420 F2=330 

430 F3=466 

440 REM PLAY CHORD 

450 CALL SOUND(lOOO,FI,0) 

460 CALL SOUND(1000,F2,0) 

470 CALL SOUND<lOOO, F3, 0> 

480 CALL SOUND (lOOO, 440, 30) 

490 CALL SOUND(1000,FI,0,F2,0,F3,0) 
500 REM INVERSIONS 

510 PRINT :TAB(6 )INVERSIONS (Y/N> 
7" 

520 CALL KEY(0,KEY,STATUS) 

530 IF KEY=7B THEN 170 
540 IF KEY089 THEN 520 
550 CALL HCHAR(23,26,KEY) 

560 REM PLAY INVERSIONS 
570 CALL SOUND(1000.F2,0,F3.0, 

2*F1, 0) 

580 CALL SOUND(1000.440,30) 

590 CALL SOUND(1000.F3.0,2*F1.0, 
2*F2,0) 

600 CALL SOUND(1000,440,30) 

610 GOTO 170 


Tl Music Skills Trainer 

The Music Skills Trainer from Texas 
Instruments is a program written in 
Tl BASIC (it will also run in Expended 
BASIC without modification). The pro¬ 
gram is available on cassette or diskette. 

Four types of drill are provided; Pitch 
Guess, Interval Recognition, Chord Rec¬ 
ognition, and Phrase Recall. The user 
selects the type of drill desired from a 
menu. 


Sunshine Software 

••CRIBBAGE •• 

Play against the TI-99/4. Computer plays 
the able opponent. 

• • QUBIQ •• 

A unique mind-boggling puzzle. Full 
Color & Graphics. 

• • SPIRAL-GRAPHICS • * 

Creates thousands of amazingly beautiful 
patterns in High Resolution. You specify 
the pattern, the computer does the rest. 

• • OBSTACLE COURSE • • 

Can you make it through this game of 
logic? Deduction tells you where the 
obstacles are, 

$8.95 each; 4 for $24.95 
Cassette only; Ti BASIC 
Complete documentation included 

Sunshine Software 

520 Milton Lane 
Hoffman Estates, IL 60194 
_Tel (312)-885-2862 



Cassette for TI-99/4 

$14.95 

Linear Aesthetic Systems 

POB 23 

West Cornwall, CT 06796 


Pitch Guess 

In this drill, you try to identify the 
pitch of a single note. While it might 
seem at first that this would require per¬ 
fect pitch, you will find after several ex¬ 
amples that you have "tuned in” and 
are able to identify pitches by relating 
each new one to the one that has pro¬ 
ceeded. The difficulty of this exercise 
can be controlled by specifying the start¬ 
ing note and range size in half steps (up 
to two octaves). In addition, you can 
choose to have notes selected from either 

the C major diatonic or chromatic scale 

by answering no or yes to the option of 
including sharps and flats. Tl has in¬ 
cluded yet another means of increasing 
the level of difficulty-"Random Music.” 
If chosen, random music is played be¬ 
tween examples, making it more diffi¬ 
cult to remember the preceeding note. 
The program provides up to ten ex- 


YOU ARE NOT ALONE 
OUT THERE 


FLORIDA 99/4 USER'S GROUP 
PROVIDES . . . 

* An indispensable forum for 
exchanging ideas. 

* Programs and technical in¬ 
formation. 

* A bi-monthly newsletter to 
keep you up to date on what 
other group members are 
doing. 

* FLORIDA 99/4 USER'S GROUP* 

Vince Johnson 

10900 SW 196th ST. #307 
Miami, Florida 33157 
(305) 251-5078 

SOURCE Mail TCU650 
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Whether you Ye already quite knowledgeable 
about computers or want to learn how to get 
started, the TI-99/4A is for you. By simply 
snapping in one of the many Solid State 
Software Command Modules either you or 
just about anybody in your family can use the 
TI-99/4A because step-by-step instructions 
are displayed light on the screen* 

The TI-99/4A gives you an unmatched com¬ 
bination of features including: 

• Powerful TI-BASIC 

• Up to 72K total memory capacity 

• NEW typewriter keyboard 

Retail price is $550. Your special BACH 
Company price is a low $389*00. To accom¬ 
pany the TI-99/4A we offer below just some of 
the accessories available. 



Solid State Speech Synthesizer $1 11.95 
Telephone Coupler (Modem) 167*95 

RS-232 Accessories Interface 167-95 

Disk Drive Controller 223.95 

Disk Memory Drive 373*95 

Soid State Printer 298.98 

Memory Expansion (32K RAM) 298.95 

R*R Modulator (TV Adapter) 37.95 

10" Color Monitor 348.95 

Wired Remote Controllers (Pair) 26.95 

Dual Cassette Cable 11.95 

Monitor Cable 14.95 

Thermal Paper (2 Pack) 7.95 



Personal Real Estate 

(Application Program) 52,95 

Marling List (Application Program) 52,95 

Bridge Bidding (Application Program) 25,95 
The Attack Game (Application Program) 29.95 

ORDER TOLL FREE 
800-227-8292 

California Residents call 415-494-1995, Use 
VISA, Mastercharge, check or money order. 
Indicate card number and expiration date. 
Order product #60. Add $4.50 for shipping. 


The BACH Company 

P.O. Box 51178 
Palo Alto, CA 94303 



amples and keeps score: 10 points for 
each correct answer. 

We recommend that when first using 
this drill, you use C as the starting note, 
a range size of 13 (one octave), no sharps 
and flats, and no random music. After a 
little practice, it shouldn’t be that diffi¬ 
cult to identify notes. 

Interval Recognition 

j This drill helps to develop your abil¬ 
ity to recognize intervals. There are three 
levels, each of which adds more intervals 
to those included in the drill. For in¬ 
stance, if you choose Level 1, the exam¬ 
ples are composed of major thirds, 
fourths, and fifths. Level 2 adds half 
steps, whole steps, and minor thirds, 
and Level 3 sixths, sevenths, and octaves. 
You can choose to have the intervals 
presented in ascending or descending 
order. For an added degree of difficulty, 
you can choose to have the lower note 
be random; it is otherwise C each time. 
You can also choose to have random 
music play between exercises. Up to ten 
examples are provided, and you receive 
10 points for each correct answer. 

Chord Recognition 

This drill provides practice in recog¬ 
nizing chords. Again there arc three 
levels with Level 1 consisting of major 
and minor chords, Level 2 adding sev¬ 
enth and diminished, and Level 3 adding 
augmented. If you choose the "Random 
Bass” option, the root can be any note; 
otherwise it is a C. If you choose the 
"Random Inversions” option, inverted 
chords will be played, otherwise, a 
root-position chord is always played. If 
you choose the "Chord Only” option, 
the three notes will be played simultane¬ 
ously. If you don’t choose it, the notes 


comprising the chord are first played in¬ 
dividually and then together. As in the 
previous drills, you can select the "Ran¬ 
dom Music” option. You receive 10 
points for each of up to 10 problems. 

Phrase Recall 

This drill develops your ability to re¬ 
member a sequence of up to nine ran¬ 
dom notes. A blank keyboard overlay, 
provided with the program, is used to 
label the keys with their corresponding 
pitch, covering two octaves much like 
the layout of a piano keyboard. You 
can select the starting note and range 
size, and determine whether sharps and 
flats are to be included in the examples. 
You can also specify the number of 
notes which constitute the phrase (T9). 
After a phrase is played, you respond by 
entering notes from the keyboard as if it 
were a piano. Notes are heard and dis¬ 
played as you play them, and if you 
make a mistake, you can use SHIFT T 
to start over again without penalty. 
When you have entered the notes that 
you think correctly represent the phrase, 
you press ENTER. The correct notes are 

then displayed below your response, 
and you are awarded points based on 
the number of correct notes and the 
number of notes included in the phrase. 
Up to ten examples are given with a pos¬ 
sible total score of up to 100 points. As 
in the previous drills, the "Random Mu¬ 
sic” option can be chosen to make this 
drill even more difficult. 

We feel that Tl’s Music Skills Trainer 
will be useful for the experienced musi¬ 
cian who wants to keep his auditory 
skills sharp. We would also highly recom¬ 
mend it for the novice who is interested 
in further developing his knowledge and 
abilities in those areas of music theory 
covered by the program. 
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The Charter Issue of 




T.M. 


SMS|||EI@M§ 


Only $3.95 postpaid 


is Still Available • . 

. . . but quantities 

are limited 

so ORDER TODAY! 


Use the bind-in card in the back of the magazine for your convenience in ordering. 

SAMPLE CONTENTS : *How To Write Your Own Programs *An External Keyboard *Epson MX-80 & Printer Graphics 
•Space & Combat Games in Tl BASIC •Text-to-Speech •TMS9900 Machine & Assembly Language •Planning & Forecast¬ 
ing in BASIC •UCSD Pascal & Third-Party Development Systems •Power Line Problems •LOGO & Lamplighter •Music 
Text Editor •TM990/189 University Module •Homework Helper: Fractions •ComputerChess *and much, much more , . . 



Coming in the September/October Issue ... 


• Printing A Personal Calendar 

• Business Software Reviews 

• Interfacing with Teletypes 

• Business Forms Generator 

• Bit-Plot Printer Graphics 

• Personal Record Keeping 

Command Module Applications 

• Educational Software Reviews 

• Adding Your Own Disk Drives 

• Computer Choreography 

• Speaking About Speech: 

Tips on Synthesizer Programming 


^Plus All Our Regular Features 
And Many Additional Surprises 
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Dear Sir: 

1 doubt this letter will ever reach your eyes, 
but if it does I just would like to extend to 
you my deepest appreciation for giving me 
the privilege of receiving, in my opinion, 
one of the best written, most organized, and 
thoroughly fascinating magazines intro¬ 
duced on the market* I was very impressed 
with all the articles and was especially inter¬ 
ested in the one on the "Lamplighter” pro¬ 
ject, I also am thinking of purchasing the 
book "Mindstorms*” 

I am very excited about many of the things 
[in the articles] and I am looking forward 
to the July/August issue of 99'er Magazine, 

Bill Finley 
Raleigh, NC 

Thanks for the kind words f Bill. Yours are 
typical of the many letters we received from 
fellow 99'ers. ft's a pleasure to be serving 
you alL 

Dear Sir: 

In the article about Extended BASIC,CALL 
SAY is referred to as a Tl BASIC command. 
Please inform me what this is since it doesn't 
appear in my user's guide* 

Also, you should tell people that when they 
send away for software/hardware they read 
about in 99'er Magazine, they should tell 
the advertiser that they saw their ad. That 
will help you keep advertisers and gain new 
ones, 

J. Douglas Wellington 
Jersey City, NJ 

CALL SAY as a Tl BASIC command is ex¬ 
plained in the instruction booklet that comes 
with Tf's Speech Editor Command Module 
as well as the documentation for Extended 
BASIC * By the way , an excellent idea about 
mentioning the 99'er Magazine to adverti¬ 
sers, Doug/as * We certainly hope all 99'ers 
take your advice * 


GENERAL NOTES: 

In the last issue, we featured an article on 
adding an external keyboard to the T1-99/4. 
This technique did require slight modifica¬ 
tions to the console, Texas Instruments has 
informed us that any tampering with their 
hardware will void the warranty. We just 


Dear Sir: 

I have just recently purchased Extended 
BASIC. The features that it offers are excel¬ 
lent, But I have been wondering for some 
time how to incorporate high resolution 
plotting into my scientific graphs. This fea¬ 
ture would seem to me to be the first and 
most obvious extension to Tl BASIC* How¬ 
ever, I can't seem to find it. The SPRITE 
seems to be the only character to address 
the 256 by 192 high resolution dots. It is 
not immediately obvious to me whether this 
can be done as the sprites erase preceding 
sprites unless given a number, and 28 of 
them certainly cannot define a graph. Tl's 
graphing package is of no help since it is 
too specific. The statistical package gives the 
type of graphing f would like but its method 
is a secret. Can you help? 

Priscilla Walling 
Darien, IL 

An excellent question , Priscilla . . . and very 
timely as well. Watch for help with this in 
our next issue. 

Dear Sir: 

It is always a source of irritation for me to 
have to physically list the contents of each 
diskette in order to locate and then run a 
program. So I thought it would be neat if I 
could include a "LOAD" program with each 
diskette* This way, all I had to do was insert 
the diskette, crank up Extended Basic and 
select a program to run* 

The only problem with this approach is that 
you must tailor each LOAD according to 
the contents of that particular diskette. 

Then the idea came to me—A "General Pur¬ 
pose" LOAD! One that will scan the diskette 
record 0, pick out the programs, construct a 
"menu” and let me select the program I 
wish to run* 

A great idea, right? The program to do this 
is listed on the enclosed page. It works exact¬ 
ly as envisioned, except for one small catch 
—line 34. Line 34 does not work at all. I 
tried every possible combination other than 
RUN "DSK1.PROGNAME" and (as the 


want all our readers to be aware of this. 99'er 
Magazine will continue to publish articles of 
this type for those readers who have the 
technical background, experience,and desire 
to expand the performance of their own 
equipment—Ed. 


book says) this is the only way you can load 
and go* 

I would have no quarrel with this were it 
not for the OPEN command (see line 12) 
and page 138 of the Extended BASIC Man- 
uaL Even though the format of both the 
OPEN and RUN and INPUT and PRINT are 
similar, Tl has allowed the substitution of 
literals for device-filename in all but the 
RUN command. This is not only inconsistent 
(not the only inconsistency, however, as 
shown by the various forms of the DIS¬ 
PLAY USING, for example) but a tragedy 
to limit such a powerful command. 

Oh well, so much for my good ideal 

Charles Ehninger 
Fort Worth, TX 

Are there any readers out there in 99'er !and 
with an idea on how to make Charles' " Gen¬ 
erat Purpose Load" a reality? 

1 REM HmiHH I II lHH* 

2 R91 * GENERAL PURPOSE * 

3 REN * PROGRAM LOADER * 

4 REN * BY C.M.EWINGER * 

5 REM 

t OPTION BASE 1 

7 DIM PG*(20) 

8 IMAGE H 

? CALL CLEAR 

10 DISPLAY ATUM1ERASE *JJ"DISK? (1-3): 1-; 

U ACCEPT AT(12>1?) SI IE £-1) VALIDATE* 1 123* ):D$ 

12 OPEN MfrPUT iRELATIVE)INTERNAL 

13 INPUT #!!N1iAtA,A 

14 DISPLAY AT(lt8)ERASE DSK^Dtt* - 

15 1=0 

L6 FOR J=1 TO 20 

17 M+l 

18 IF I>127 THEN 36 
1? INPUT ii:Pt,A>B,B 

20 IF L£N(P*>=0 THEN 26 

21 IF ABS(A)05 THEN 19 

22 DISPLAY Am+2ii0):USING SsX; 

23 DISPLAY ATU+2,14)iP*i 

24 ?G5U)=Pf 

25 NEXT T 

26 DISPLAY ATUC+2) 10):USING 

27 DISPLAY ATfX+2i14):"TERMINATE“1 
2S DISPLAY ATOM* 14'CHOICE? i'; 

29 ACCEPT AT(X+3i22)$IZ£{-2)VALIDATEfDIGIT) 

30 IF K=X H£N 35 

31 IF KCt OR 020 THEN 23 

32 IF LENtPGiOO )*0 THEN 28 

33 CLOSE #1 

3J RUN 'DST^ViPWIO 

35 CALL CLEM 

36 END 
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FAST and EASY RETRIEVAL 

OF THE DISKETTE 


YOU NEED... 


Mini-Flex Partition Design 




STANDARD 
CASE OR DISK BOX 


IMPROVED NO*WARP 
EASY ACCESS DESIGN 


The MINI-FLEX is styled with low sides and snag-proof 
edges.*, making removal and replacement of diskettes 
easy and safe. 

The design of the MINI-FLEX case is a unique contribution 
to diskette safety. Many owners keep their disks in the carton 
they came in. Deprived of proper support, diskettes get into 
a slumped-over posture. But, the MINI-FLEX case is built 
with inclined sections molded into its base. The inclines keep 
diskettes standing upright, assuring no-sag, no-warp storage. 
There's no need to pack diskettes tightly. The MINI-FLEX case 
construction eliminates the need for file drawer type follower 
blocks, which can actually cause compression damage, 

Warped or otherwise distorted disks result in data loss, and 
can even cause costly machine damage and "down" time. The 
inclined sections in the MINt-FLEX bottom prevent all that. 

The MINI-FLEX is a stylish appointment 
in your office environment. 

Its 1 color is impregnated.. .it wipes clean with 

just a damp cloth. The case's rounded corners wont snag 

clothing or mar furniture. 

The MINI-FLEX is compact and convenient. It occupies less 
desktop space than a piece of typing paper making for more 
efficient use of any work station. And since the top nests with 
the bottom, you don't need extra space to put it down when 
you take it off. 

An office environment poses some of the worst dangers 
to the good health of your diskettes. 

Dust, dirt, and smoke are in the air. 

Heat and magnetic interference generated by 
office machines create more hazards. They can destroy 
valuable information stored on a disk's magnetic recording 
material—a risk your diskettes run between the time you 
store data and the time you want it back. 

There are other possible problems. Unregulated vertical 
storage can lead to sagging, slumping or warping of diskettes. 
Horizontal stacking can cause compression damage. Bending 
or creasing a disk while sorting through a jam-packed box can 
result in data loss. 

So, you can see, there are a lot of factors that can lead to 
losing valuable information.. .information that will always cost 
you time and money to replace. 



. .While Guarding Against Data 
Dropout Caused By Improper 
Storage and Handling. 



9*i r 
24.B cm 



6V* n 

16.5 cm 


?W 

— 19 7cm. 



Specifications: Capacity; 50 Diskettes with Envelopes 
Shipping Weight: 3 Lbs./1.35 Kg. Partitions: 3 Color: Smoke and Sand 1 Package MINI-FLEX Guides 

MINI-FLEX DISKETTE FILE 


MINI-FLEX doesn't conduct heat or electromagnetism like 
metal cases do. 

Spacious enough to store up to 50 mini-diskettes in their 
protective envelopes as recommended by all media 
manufacturers, yet small enough to conserve work space. 
The base nests in the lid for a compact configuration in use. 

There's a modern modular concept behind the MINI-FLEX 
design. It's adaptable to any quantity of information,, .compact 
enough for smaller storage requirements., .flexible enough for 
dividing even the largest libraries into convenient units, the 
way separate drawers do in a file cabinet. 


List Price: $29.95 

Special Price $24.95 

Add S2.50 shipping and handling. Use the bind-in card in the 
back of the magazine for your convenience in ordering. Tele¬ 
phone orders accepted if charged to credit cards. 



Improper handling of diskettes can cause data loss. With 
the MINI-FLEX, handling is cut down to a minimum. 

In storage, your diskettes are separated by heavy-duty 
partitions, they won t wear out. And they can be moved—or 
removed—as your file grows. When an operator searches for 
a specific disk, the partitions open naturally into V-shaped 
compartments. An operator can view the entire front of each 
disk's envelope without having to remove the disk from the 
case—or bend it for visibility. That makes for fast accurate 
search and instant identification with no danger of bending 
or creasing valuable disks. 
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INNOVATIVE PRODUCTS 
FOR TMS9900-BASED 
PERSONAL COMPUTING 


P.O. Box 5537 
Eugene, Oregon 97405 
Tel. (503) 485-8796 











FINALLY 


Single-Sheet & Roll-Feed 

For Your 






MX-80 

Printer 


J_ ■ 
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Increased Printer Versatility 


Cheaper Paper Supplies 


Less Paper Wastage 


Large Time Savings 


Quickly Pays For Itself 


_ ^ 

Now You Can: 

S3 Fill In Purchase Orders, Invoices, Statements and Other 53 Use Your Own Letterheads for Business Correspondence 
Business Forms One-At-A-Time, As Needed—Without or Colored Paper for Graphics Designs, Posters, and 

Having to Wrestle Cartons of Pin-Feed Supplies In & Out Direct Mail Flyers, 
of Yo ur Printer. , 

fTl Use Cheap Roll Paper for Most of Your Printing Needs 

PPl Install It Yourself In Less Than 45 Minutes With Only A and Forget About Printing On or Over the Perforations. 
Small Screwdriver & Penknife. 

A Cost-Effective Upgrade That 
EPSON MX-SO Owners 
Can’t Afford To Be Without! 



Each Kit Comes Complete With: 

2 Acrylic Drive Wheels {With Rubber Friction Rings) Machined 
to Exacting Tolerances (+ .0005, - 0.0 inches) for a Snug Fit 

1 Weighted Pinch Roller Assembly 
1 Roll Paper Holder 


Special Price: 



ONLY $49.95 

Add $2.00 for Shipping & Handling. Use the 
bind-in card in the back of the Magazine for 
your convenience in ordering. Telephone orders 
accepted if charged to credit cards. 




Illlllllllllllllllllllllllllllll 


INNOVATIVE PRODUCTS 
FOR TMS9900-BASED 
PERSONAL COMPUTING 


P.O. Box 5537 
Eugene, Oregon. 97405 
Tel. (503) 485-8796 















































